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C-10 Convertidor de monitor en TV 



Preparado para todos aquellos monitores con entrada RGB LINEAL 
o video compuesto: AMSTRAD, COMMODORE, PHILIPS, HANTAREX, etc. 
Convierte cualquier monitor en color con 
entrada RGB-LINEAL o PAL en una T.V. 
color de alta calidad de imagen. De un 
manejo muy sencillo, no es necesario 
efectuar ninguna modificación en el 
monitor. Su uso no produce deterioro ni 
alteración alguna en el funcionamiento 
del monitor y su diseño le hace 
perfectamente acoplable debajo del 
mismo. 


ESPECIFICACIONES: 

• 3 bandas 

• Presintonla de 8 canales 
. Salida RGB-LINEAL 

• Entrada y salida de video 

• Entrada y salida de audio 

• Amplificador de sonido y altavoz incorporados 


conectamos | 
con tus ideas 
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Serie Oro 

Con este programa podrás disputar 
partidas de ajedrez, con todas las 
posibilidades que los ordenadores 
desarrollan. 


Introducción 
al Pascal 

El lenguaje Pascal está considerado 
como el lenguaje de la pedagogía. 
Destinado para desarrollar en el 
programador una mente estructurada y 
lógica, ha pasado a ser en los últimos años 
uno de los lenguajes más eficientes como 
instrumento de desarrollo. 




Contabilidad 


Una de las facetas del campo 
profesional, donde los ordenadores tienen 
más que decir, es la de la contabilidad. En 
esta ocasión hemos puesto a prueba un 
nuevo paquete. 


42 

Así se 
hace un 
ajedrez 




CucaI 

Un juego donde la velocidad de nuestros 
dedos y nuestra habilidad serán 
instrumentos indispensables para acabar 
con la plaga de cucarachas. 



Batman 

Analizamos uno de los primeros juegos 
desarrollados para PCW, se trata de un 
clásico en la técnica filmation: Batman. 

A través del texto encontrarás cómo 
sortear muchos de los peligros que rondan 
al valeroso murciélago. 



Uno de los tipos de programas que más 
asombro causan en el usuario son los que 
juegan al ajedrez. A través de las páginas 
de este extenso artículo descubrirás los 
secretos que se esconden bajo este tipo de 
programas. 


S3: 


Poke 
Especial 

Seguramente muchos de los juegos que 
compraste quedaron aparte de 
inacabados, perdidos en un cajón. Ahora 
es el momento de desempolvarlos y 
disfrutar con saña y sangre fría de una 
terrible venganza. 


Mrs. 
Joystick 

Uno de los últimos 
productos de Erbe, se 
trata de Avenger, un 
juego donde se ponen 
a prueba todas 
nuestras habilidades. 






































JUEGA AL 
AJEDREZ 


Presentamos en esta ocasión el clásico juego del 
ajedrez para jugar entre dos personas, el 
ordenador lo único que hace es controlar los 
movimientos que realizan los jugadores. 



as instrucciones de 
manejo del programa son muy 
sencillas, ya que es totalmente 
autoexplicativo, no obstante, ahí van 
algunas breves notas sobre su manejo. 

Después de mover una pieza no 
se puede volver atrás. 


VARIABLES 

JUGADA$ {) 

Tabla de 500 elementos que 
contendrá las jugadas 
realizadas para poder ver la 
partida después de acabarla. 
Tabla de 8x8, indica dónde 
se encuentran colocadas las 
piezas en el tablero. 

H$ () 

A$ 

Coordenada horizontal de la 
pieza que se va a mover. 

B$ 

Coordenada vertical de la 
pieza que se va a mover. 

c$ 

Coordenada horizontal de la 
casilla donde se va a mover. 

D$ 

Coordenada vertical de la 
casilla donde se va a mover. 

TNI, TND, 

TBI, TBD, 

REYN,REYB 

Cuando alguno de estos flag 
se pone al, indica que no 
se puede hacer el enroque 
con esa ficha. 

ZS 

Cuadro blanco. 

X$ 

Cuadro neqro. 

T$/ P$, AL$, 

CA$, R$, 

RN$ 

Contienen las figuras, torre, 
peón, alfil, caballo, rey y 
reina respectivamente. 

PP 

Puntero de la tabla 

JUGADA$(). 

REPETICION 

Si está a 1, indica que se 
está viendo la partida 
repetida y no mete la jugada 
en la tabla JUGADA$(). 

JUGADOR 

Jugador al que le toca 
mover. 

FICHA$ 

Color de las piezas que 
tienen que mover. 


Si le hemos dicho la pieza que 
aueremos mover, pero no el 
destino, podemos volver atrás 
dándole una jugada incorrecta. 

Para hacer el enroque basta 
con darle la posición del rey y la 
casilla que va a ocupar. Para el 
rey blanco sería: 

Desde E8 hasta G8: enroque 
corto. 

Desde E8 hasta C8: enroque 
largo. 

En la línea 1800 están puestos 
los colores, puse esos porque en 
el monitor verde se ven mejor, 
para el de color poner los colores 
que queráis. 



118 CLEAR:DEFINT A-Z:G0SU8 1318:DIH J 
UGADA$(500):JUGAD0R=2:PEN 1 
120 LOCATE 4,4¡PRINT P$:LOCATE 10,4:P 
R1NT Ti¡LOCATE 1¿,4¡PRINT CAiiLOCATE 
22,4:PR1NT ALi:LOCATE 28,4:PR1NT RÍ;L 
OCATE 34,4¡PRINT RNI 
125 LOCATE 12,25:PRINT CHR$<164)*' ER 
2UR1 1986' 

130 LOCATE á,2:PRM*A J E D R E Z 
(2 JUGADORES) 

140 HOME 144,158:DRAU 144,240:DRAU 49 
4,240¡DRAM 494,158:DMU 144,158:L0CAT 
E 11,12:PR1NT'1.- INSTRUCCIONES 1 ¡LOCA 
TE 11,14:PRINT'2.- EMPEZAR EL JUEGO" 
158 A$=INKEYÍ:IF AD1 1 THEN GOSUB 29 
10 ELSE IF AD2 1 THEN 1¿0 ELSE 150 
140 CLS¡GOSUB 1890 

170 HÍ<1,1)= , TN 1 ¡HÍ<2,1)= 1 CN 1 :HÍ<3,1) 
=1 AN* ¡HÍ<4,1)= , RW:HÍ(5 I 1)= , RN" ¡Hi(6 
,1)=HÍ(3,1)¡HÍ(7,1)=HÍ(2,1)¡HÍ(8,1)=H 
i<l,1)¡FOR 1=1 TO 8:H$(I I 2)= , PN , :NEXT 
180 FOR 1=1 TO 8:HÍ(I,7)= , PB‘¡NEXT¡Hi 
(1,8)= , TB 1 :Ht<2,8)= , CB 1 :Ht<3,8)= , AB"¡ 
Hi(4,8)= , RNB 1 :Ht(5,8)=*RB":HÍ<4,8)=H* 
<3,8):HÍ(7,8)=HÍ(2,8):HÍ<8,8)=HÍ<1,8) 
¡PEN 1¡LOCATE 28,1¡PRJNT’LETRA,NUMERO 
1 ¡LOCATE 27,24¡PRINT'Z PAIW ACABAR 1 
190 PEN 1:IF JUGADORA THEN JUGA00R=2 
¡FICHAD-NEGRAS 1 ELSE JUGADORA ¡FICttt 
*=■BLANCAS 1 

200 PRINT CHRt(22)jCHR$<0)¡LOCATE 39, 
21¡PRINT 1 1 ¡LOCATE 34,4¡PRINT 1 *¡L 
OCATE 34,5:PRINT‘ 1 

210 LOCATE 29,20¡PRINT 1 JUGADOR¡ 1 ¡JUGA 
D0R:L0CATE 27,21 ¡PRINT'MUEVEN "¡FICM 
i¡PRINT CHRÍ<22)¡CHR$(1)¡LOCATE 28,4: 
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DESDE¡ 
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PRINT’ DESDE:*:A*=1NKEY*¡IF A*=’’ THEN 
218 

228 Af=UPPER*(A*)¡lF A$=’Z’ THEN 2228 
EL5E IF A*<’A’ OR A$)’H’ THEN 218 
238 IF A$=’A’ THEN A=1 ELSE IF Af=’B’ 
THEN A=2 ELSE IF A*=’C’ THEN Af3 ELS 
E IF A$=’D* THEN A=4 ELSE IF A$=’E’ T 
HEN 4=5 ELSE IF A$=’F’ THEN A=6 ELSE 
IF A*=’G’ THEN Af? ELSE IF A$=’H’ THE 
N Af8 


248 LOCATE 34,4:PRINT Aij’/iB^MEY 
$:1F B8=’’ THEN 240 
258 IF B$<’1‘ OR BO'B* THEN 248 ELSE 
LOCATE 36,4;PR1NT B* 

268 B=VAL(B8)¡IF R16HT*<H8<A,B),1)=** 
THEN 270 ELSE 288 

278 PRINT CHR$<7)¡LOCATE 2? I 14:PR1NT , 
IMPOSIBLE':A$=1NKEY$:1F A*=" THEN 27 
8 ELSE PRINT CHR$(22);CHR$<0)¡LOCATE 
29,14:PRINT STRIN6ÍU8,’ ’)¡LOCATE 34 
,4¡PRINT’ ’¡LOCATE 34,5:PRINT’ ’¡ 
PRINT CHRÍ<22);CHW(1):60T0 210 
288 IF (JUGADORA ANO RI6HT«H$<A,B), 
1)=’N’) OR <JUGAD0R=2 AND R16HT*<KÍ(A 
,B),1)= , B’) THEN 270 
298 LOCATE 28,5¡PR1MT , FWSTA:’:C$=1NKE 
Y$:1F C$=“ THEN 298 
388 C*=UPPER*(»):1F C8<’A’ OR M)*H’ 
THEN 298 ELSE LOCATE 34,5¡PRINT 

I 

318 D*=1NKEY8:IF W<M’ OR D$>’8’ THE 
N 310 ELSE LOCATE 36,5¡PRINT W 
328 D=VAL(D$)¡IF C$=’A’ THEN C=1 ELSE 
IF M=’B’ THEN C=2 ELSE IF M=’C’ TH 
EN 03 ELSE IF C$=’D’ THEN C=4 ELSE I 
F C8=’E’ THEN C=5 ELSE IF C^’F’ THEN 


06 ELSE IF C$=’G’ THEN 07 ELSE IF 
CO’H’ THEN 08 

338 IF H$(A,B)=’PB’ OR H8<A,B)=’PN’ T 
HEN 358 ELSE IF H$(A,B)=’TB’ OR H*(A, 
B)=’TN’ THEN 598 ELSE IF H$(A,B)= , AB’ 
OR H$(A,B)=’AN' THEN 770 ELSE IF H$( 
A,B)=*CB* OR t»(A,B)=’CN’ THEN 1158 
340 IF K*<A,B)="RB’ OR H»(A,B)=’RN’ T 
HEN 988 ELSE IF H$(A,B)=*RNB* OR W(A 
,8)='RNN' THEN 960 


368 IF A=C THEN 378 ELSE 438:'AV44ZAR 
Y COMER 

370 IF B>D 440 H$(A,B)= , PN’ THEN 278¡ 
'NO PUEDEN IR PARA ATRAS LAS NEGRAS 
388 IF D)B ANO H*(A,B)=’PB’ THEN 270¡ 
'NO PUEDEN IR PARA ATRAS LAS BLANCAS 
398 IF <B-2>0 AND H»<A,B)=’PB’) OR (D 
-B>2 AND HKA,B)=’PN’) THEN 270 
480 IF <B-02 AND H8<A,B)= , PB‘ AND B< 
>7) OR (D-02 AND H$<A,B)= , PN’ AND B< 
>2) THEN 278 

418 IF <B*1=D OR B-1=D) AND H8(C,D)<> 
’’ THEN 270 
420 GOTO 588 

438 IF A-1=C OR A+1=C THEN 440 ELSE 2 

78 

440 IF <A-1=C OR A* 1=0 44D Hf(C,D)=" 
’ THEN 270 

458 IF (A-1=C OR A*1=C) ANO H*(A,B>=’ 
PB’ AND RIGHTiTHfKC.DT.DO’N* THEN 2 

78 

468 IF (A-1=C OR A+1=C) AND H8(A,B)=’ 
PN’ AND RIGHTiaKTC.Dl.DO'B’ THEN 2 

78 

478 IF B-1=D OR B*1=D THEN 488 ELSE 2 


78 

480 IF HKA.B^’PB’ AND RIGHT8(W(C,D 
I.DO’N’ THEN 588 

498 IF H$(A,B) =, PN' 44D RIGHTS(Ht<C,D 
Í.DO’B" THEN 278 

588 GOSUB 2488¡IF Sl*=l THEN SU=0:6OTO 
270 ELSE GOSUB 1970 
518 IF SU=2 THEN SU=6:B0RDER 1,7 ELSE 
538 

528 A$=1NKEY8¡1F A$=" THEN 528 ELSE 
BORDER 1 ¡PRINT CHM<22);CHRI(8):L0CAT 
E 31,14¡PR1MT’ 

538 IF D=1 THEN 548 ELSE IF D=8 THEN 
550 ELSE 588¡'CAMBIAMOS UN PEON POR U 
M DAMA 

548 IF C=1 OR 03 OR 05 OR O? THEN 
PEN 2¡60T0 560 ELSE PEN 0:GOTO 560 
558 IF C=1 OR 03 OR 05 OR 07 THEN 
PEN 0:60TO 578 ELSE PEN 2¡GOTO 578 
568 LOCATE OOC-2,D+D«D-2¡PRINT Z*¡P 
EN 1 ¡LOCATE C*C+C-2,D*D*D-2:PRINT RN* 
¡Hf<C,D)=’RNB , :GOTO 588 
570 LOCATE C*C*C-2,D*D4D-2¡PR1NT Z«:L 
OCATE C+C+C-2,D+ D-*D-2:PEN 3:PRINT RN8 
¡H»<C,D)= , RM4’ 

588 GOTO 198 

590 '***** TORRE ***** 

608 IF A=C THEN 618 ELSE IF OD THEN 
718 ELSE 270¡'MOVIMIENTO VERTICAL Y H 
OR1ZONTAL 

610 IF 6<D THEN 620 ELSE 648 
628 FOR I=B+1 TO D-l¡IF HKC.DO” T 
HEN 270 ELSE NEXTiIF <HÍ(A,B)=-TB’ OR 
H$(A,B)= , RB’ OR HÍ(A,B)=’RNB’) AND R 
IGHT$(H$(C,D),1)= , B’ THEN 270 
638 FOR I=B+1 TO D-l:1F HfíC.DO’’ T 
HEN 278 ELSE NEXTilF <HÍ(A,B)=’TN’ OR 
Hi^B^’RN’ OR H8<A,B)= , RW4‘) AND R 
1GHT*<HÍ(C,D),1)= , N’ THEN 278 ELSE 66 
0 

640 FOR 1=0*1 TO 8-1 ¡IF HKC'DO" T 
HEN 278 ELSE NEXTilF <H*<A,B)=-TB’ OR 
H$(A,B)=’RB’ OR HI(A,B)= , RNB’) 44D R 
I6HT8(H$(C,D),1)= , B’ THEN 278 
658 FOR 1=D*1 TO B-1.-1F HttC.DO’’ T 
HEN 278 ELSE NEXT:IF <HÍ(A,B)=“TN’ OR 
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358 '**<** PEON ***** 
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t»(A,B)= , RN" OR HÍ<A,B)= , RNN , > WD R 
I6HT$(H4(C,D) ,l)= a N a THEN 278 
¿¿8 GOSUB 2480:IF SU=1 THEN SU=0:6OTO 
278 ELSE GOSUB 1978 
679 1F SU=2 THEN SU=B:BORDER 1,7 ELSE 
¿98 

¿88 A$=INKEY4:IF A$= aa THEN ¿80 ELSE 
BORDER liPRINT CHR$(22);CHR$<8):L0CAT 
E 31,14¡PRlNT a 

¿98 1F Af 8 AND B=8 THEN TBOl ELSE 1F 
AfI AND B=8 THEN TBI=1 ELSE IF A=1 A 
ND OI THEN TN1=1 ELSE TND=1 
788 GOTO 198 

718 IF A<C THEN 720 ELSE 748 
728 FOR I=A*l TO C-l:IF H4<l,DX> aa T 
HEN 278 ELSE NEXT:1F <H$<A,B)= a TB a OR 
Hi<A,B)= a RB , OR H$<A,B)=‘RNB a ) MD R 
16KT^<H$<C,D>,1) =, B* THEN 270 



730 FOR I=A+1 TO C-l:IF H$<I,DX> aa T 
HEN 278 ELSE NEXT:IF <H$<A,8)= a TN a OR 
Hi(A,B) s, RN* OR H*(A,B)= a RNN a ) AND R 
I6KT$(H1(C,D),1)= , N" THEN 278 ELSE 7¿ 
8 

740 FOR I=D1 TO A-1:1F I»<I.DX)" T 
HEN 278 ELSE NEXT:IF <HÍ(A,B)= a TN a OR 
H$(A,B)="RN' OR H4(A,B)= a RNN a ) MD R 
I6HT4(H4(C,D),l)= a N a THEN 270 
758 FOR 1=C*1 TO A-l :1F K*(l,DX> aa T 
HEN 278 ELSE NEXT:IF <HÍ<A,B)="TB , OR 
H4(A,B)= a RB' OR W(A,B)= a RNB a ) AND R 
I6HT4(Hf(C,D), 1 ) =, B“ THEN 278 
7¿0 GOTO ¿¿8 
778 '***»* ALFIL ***** 

788 X=ABS(A-C) :Y=ABS(B-D) :IF XOY THE 
N 278 ELSE X=A:Y=B 

798 IF A<C AND B<D THEN 880 ELSE IF A 
)C AND B<D THEN 838 ELSE IF A)C AND B 
)D THEN 8¿0 ELSE IF A<C AND B)D THEN 
890 ELSE 278 

888 X=X*1:Y=Y*1:IF X=C THEN 818 ELSE 
IF H$<X,YX> aa THEN 278 ELSE 880 
818 IF <H$(A,B)= a AB a OR H$<A,B)= a RB a 
OR H$(A,B)= a RNB a ) WD RIGHT$(H»(C,D), 
l)= a B a THEN 270 

828 IF (H0(A,B) =, AN' OR »<A,B)= a RN a 
OR H$(A,B)=*RW) AND RI6HT4<H$<C,D), 
l)= a N a THEN 278 ELSE 928 


838 X=X-1:Y=Y*1:IF X=C THEN 848 ELSE 
IF H*(X,YX> aa THEN 278 ELSE 838 
840 IF <W(A,B)= , AB- OR H4<A,B)= a RB a 
OR H$(A,B)='RNB a ) MD RI6HT4(H4(C,D), 
l)= a B a THEN 278 

858 IF <HS<AjBI^'AN" OR H$<A,B)= a RN a 
OR H$<A,B) =, RW) AND RIGHT4<H4(C,D), 
l)= a N a THEN 278 ELSE 928 
8¿8 X=X-1:Y=Y-1:IF X=C THEN 870 ELSE 
IF »<X,YX> aa THEN 278 ELSE 8¿8 
878 IF (H<(A,B)= a AB a OR HKA,B)="RB* 
OR H4(A,B)= a RNB a ) AND RIGHWH4<C,D>, 
1)=‘B‘ THEN 278 

888 IF <H$(A,B)= a AN a OR H$<A,B)= a RN a 
OR H$(A,B)= , RW) AND R16HT4(H$<C,D>, 
D»"N' THEN 270 ELSE 928 
898 X=X4l:Y=Y-l:IF X=C THEN 988 ELSE 
IF H*<X,YX> aa THEN 270 ELSE 898 
988 IF <H4<A,B)= a AB a OR H*<A,B)= a RB a 
OR H$(A,B)= a RNB a ) AND R16HT4(H$<C,D>, 
l)= a B a THEN 270 

918 IF (H$<A,B)= a AN a OR H4<A,B)= a RN a 
OR Ht<A,B)= a RM4 a ) AND RIGHT«H4<C,D), 
l)= a N a THEN 270 

928 GOSUB 2408:1F SU=1 THEN SU=8:60T0 
278 ELSE GOSUB 1978 
938 IF SW=2 THEN SW=0:BOROER 1,7 ELSE 
950 

948 A$=INKEY4¡1F A4= aa THEN 940 ELSE 
BORDER liPRINT CHR4<22);CHRÍ<8)¡L0CAT 
E 31,14:PRlNT a • 

958 GOTO 198 

9¿8 '****» REINA ***** 

978 IF OC OR B=D THEN 590 ELSE 770 
980 '«*<* REY ***** 

998 IF <A=5 AND 08 AND 03 AND D=8)0 
R<A=5 AND B=8 AND 07 AND O8)0R<A=5 
AND OI AND 03 AND O1)0R<Af 5 AND O 
1 AND 07 AND D=l) THEN 1888 ELSE 112 
8 

1008 GOSUB 2408:1F SW=1 THEN SW=8:60fT 
O 270 



1818 IF SU=2 THEN SW=8¡BORDER 1,7 ELS 
E 1038 

1828 A4=INKEY4¡1F A*= aa THEN 1828 ELS 
E BORDER líPRINT CKR$<22>iCHR4<8):L0C 
ATE 31,14:PRINT a 

1038 IF Af5 AND B=8 AND 03 MD 08 A 



ND REYO0 AND TB1=8 AND H$<2,8)= aa AN 
D K4(3,8)= aa PN D H«4,8)= aa THEN 1188 
¡'ENROQUE LARGO DE BLANCAS 
1848 IF Af 5 MD B=1 AND 03 AND OI A 
ND REYN=0 AND TNI=8 AND H»<2,l)= aa AN 
D Hi<3,l)= aa AND H4(4,l)= aa THEN 1888 
¡'ENROQUE LARGO DE NEGRAS 
1850 IF A=5 MD 08 AND 07 AND 08 A 
ND REYO0 AND TBO0 AND H*(7,8)= aa AN 
D «(¿,8)=" THEN 1098¡'ENROQUE CORTO 
DE BLANCAS 

10¿0 IF 05 MD OI AND 07 AND OI A 
ND REYN=8 AND TNO0 AND H4(7,l)= aa AN 
D H$(¿,1)=" THEN 1110:'ENROQUE CORTO 
DE NE6RAS 
1070 GOTO 270 

1880 TNI=1:REYN=1¡PEN 2:L0CATE 13,1:P 
R1NT 74¡LOCATE 1,1:PRINT Z4:PEN 3:L0C 
ATE 7,1¡PR1NT R$¡LOCATE 10,1¡PRINT T$ 
¡H4(4,1)=H$<1,1):H4(3,1)=H4(5,1)¡H4<1 
,l)= aa :H$<5,l)= aa ¡GOTO 190 
1098 TBOl ¡REYOl ¡PEN 8¡LOCATE 13,22¡ 
PR1NT ZS¡PEN 1¡LOCATE 19,22:PR1NT R4: 
PEN 2¡LOCATE 22,22:PR1NT Z4¡PEN 1¡LOC 
ATE 1¿,22:PRINT T4;HÍ<7,8)=H$<5,8)¡H4 
<¿,8)=H4(8,8):H$<5,8)= aa ¡H4<8,8)= aa ¡G 
OTO 198 

1188 TBOl ¡REYOl ¡PEN 8:L0CATE 13,22: 
PR1NT Z4¡LOCATE 1,22:PR1NT Z4:PEN 1¡L 
OCATE 7,22;PRIWT R4:LOCATE 18,22¡PRIN 
T T4:H4(4,8)=H$(1,8)¡H*(3,8)=H$<5,8)¡ 
W<l,8)= aa ¡HÍ(5,8)= aa :G0T0 190 
1118 TNOl ¡REYhOl¡PEN 2:L0CATE 13,1 ¡P 
RINT Z4:PEN 3:L0CATE 19,1¡PR1NT R4:PE 
N 8¡LOCATE 22,1¡PRINT Z4:PB< 3¡L0CATE 
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16,1:PR1NT T<:H$(7,l)=Hf(5,l):H<(6,l 
)=HÍ(8,1):HI(5 I 1)= , *:H<(8,1)= ,, :G0T0 
198 

1128 X=ABS(A-C):Y=ABS<B-D)¡LOCATE 2?, 
12:1F X>1 OR Y>1 TKEN 278 
1138 1F £=1 THEN REYN=1 ELSE REYB=1 
1148 1F AfC OR B=D THEN 598 ELSE 778 
1158 '**«* CABALLO ***** 

1168 IF A-1=C AND 8-2=0 THEN 1258 
1178 1F A-2=C AND B-1=D THEN 1258 
1188 1F A-2=C AND B*1=D THEN 1258 
1198 1F A-1—C AND B*2=D TKEN 1258 
1288 1F A*1=C AND B+2=D THEN 1258 
1218 1F A*2=C AND B+1=D THEN 1258 
1228 IF A+2=C AND B-1=D THEN 1258 
1238 1F A*1=0 AND B-2=D THEN 1258 
1248 6DT0 278 

1258 IF H$(A,B)='CB' AND R16HTÍ(H»(C, 
D),l)=-B- THEN 278 

1268 IF H$(A,B)= , CN* AND R16HT*<H$<C, 
D),1)*'N I THEN 278 

1278 GOSUB 2488:IF SW=1 THEN SU=0:6OT 
0 278 ELSE GOSUB 1978 
1288 IF SW=2 THEN SU=8:BDRDER 1,7 ELS 
E 1388 

1298 A$=1NKEY$:1F <#=*■ TKEN 1298 ELS 

E BORDER 1:PRINT CHR$(22);CHR4(0):L0C 

ATE 31,14 SPRINT 1 

1388 GOTO 198 

1318 SYMBOL AFTER 144 

1328 SYMBOL 144,8,7,7,7,7,7,4,3 

1338 SYMBOL 145,8,68,68,68,255,255,8, 

255 

1348 SYMBOL 146,8,224,224,224,224,224 
,32,192 


1358 

SYMBOL 

147,1,1,1,1,1,1,1,1 

1368 

SYMBOL 

148,255,8,255,255,255,255 

,255, 

,255 


1378 

SYMBOL 

149,128,128,128,128,128,1 

28,128,128 


1388 

SYMBOL 

158,1,1,1,3,7,8,15,8 

1398 

SYMBOL 

151,255,255,8,255,255,8,2 

55,8 



1488 

SYMBOL 

152,128,128,128,192,224,1 

6,248 


1418 

SYMBOL 

153,8,8,0,8,0,0,8,3 

1428 

SYMBOL 

154,0,24,68,126,126,68,24 

,255 



1438 

SYMBOL 

155,8,8,0,8,8,8,8,192 

1448 

SYMBOL 

156,255,8,255,255,255,8,2 

55,8 



1458 

SYMBOL 

157,8,8,8,8,8,1,3,7 

1468 

SYMBOL 

158,8,24,68,182,231,231,8 

1478 

SYMBOL 

159,0,8,0,8,8,128,192,224 

1488 

SYMBOL 

168,7,7,7,7,7,7,7,3 

1498 

SYMBOL 

161,231,231,231,231,231,2 

31,255,255 


1588 

SYMBOL 

162,224,224,224,224,224,2 

24,224,192 


1518 

SYMBOL 

163,1,8,8,8,15,15,9,8 

1528 

SYMBOL 

192,129,255,126,126,36,23 


1,231,8 


1538 SYMBOL 165,128,8,8,8,248,248,144 

,« 

1548 SYMBOL 166,8,8,24,68,126,127,119 



1558 

SYMBOL 

167,8,24,24,126,126,24,15 

3,195 


1568 

SYMBOL 

168,8,8,24,68,126,254,238 

,198 



1578 

SYMBOL 

169,119,119,63,63,31,31,1 

5,15 



1588 

SYMBOL 

178,238,238,252,252,248,2 

48,248,248 


1598 

SYMBOL 

171,7,7,3,2,1,1,8,8 

1688 

SYMBOL 

172,255,255,255,8,255,0,2 

55,8 



1618 

SYMBOL 

173,224,224,192,64,128,12 

8,8 



1628 

SYMBOL 

174,8,1,1,3,7,15,15,14 

1638 

SYMBOL 

175,8,4,148,254,253,252,2 



54.255 

1648 SYMBOL 176,8,8,8,8,8,128,64,96 
1658 SYMBOL 177,31,63,127,95,128,49,3 
|3 

1668 SYMBOL 178,255,223,191,127,255,2 

55.255.255 

1678 SYMBOL 179,32,168,168,144,288,28 
8,288,144 

1688 SYMBOL 188,7,15,15,15,31,31,31,8 
1698 SYMBOL 181,255,255,255,255,255,2 

55.255.8 

1788 SYMBOL 182,168,184,288,288,288,2 
88,248 

1718 SYMBOL 183,8,32,113,32,33,35,55, 
63 

1728 SYMBOL 184,8,129,195,129,129,195 
,231,255 

1738 SYMBOL 185,8,4,142,4,132,196,236 
,252 

1748 SYMBOL 186,63,63,63,31,31,15,8,7 
1758 SYMBOL 187,255,255,255,255,255,2 

55.8.255 

1768 SYMBOL 188,252,252,252,248,248,2 
48,16,224 

1778 SYMBOL 189,7,2,3,1,1,8,8,8 
1788 SYMBOL 198,126,68,126,255,8,255, 

255.8 

1798 SYMBOL 191,224,64,192,128,128,8, 

8.8 

1888 MODE lslNK 1,24:1NK 2,14:1NK 3,6 
1818 z*=STRlNG*<3,CHR*<143))4CHR8(18) 
4CHR8(8)*CHR$(8)+CHW(8)*STR1NG$(3,CH 
W<143))*CHRÍ(18)4CW»(8)+CHW(8)*CHR 
t(8»STRING*<3,CHR*<143)> 

1828 x8=STRING$(3,CHR$(128))4CHR$(18) 
.Cm«(8HCHM(8)4CH»(8)4STRINW(3,CH 
M(128))4CHR$(18)4CHR8(8)*CHR$<8)4CHR 
*<8)4STRING*(3,CH»<128)) 

1838 T$=CHRI(144)4CHW(145)4CHI»(146) 
4CHR8<18)4CHRÍ(8)4CHR$(8)4CHR$<8)4CHR 
$<147HCHM<148)4CHR$<149)4CHW<18)4C 
HR*(8)4CHR*<8)4CHR«(8)4CHR*<158)4CHR$ 
(151)4CHR$(152) 

1848 P$=CHW(153)4CHR$(154)4CHR$(155) 
4CHR»(18)4CHR«(8)4CHW(8)4CHW(143)4C 
HRÍ(18)4CHR$<8)4CHR<(8)4CHR$(158)4CHR 
$(156)4CHW(152) 

1858 AL$=CHW(157)4CHR$(158)4CHR$<159 
)4CHf»(18)4CHRI(8)4CHW(8)4CHR$(8)4CH 
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R*(160)4CHR*<161)4CHR*<162)4CHR*<10)4 

CHR*(8)4CHR1<8)+CHR*<8)4CHR*(163)4CHR 

*<192)4CHR*(165) 

1868 R*=CHR*(16Ó)4CHR*(167)4CHR*<168) 
♦CHR*<18)4CHR*(8)4CHR*(8)4CHR*<8)4CHR 
*<169)4CHR*(143)4CHR*(170)4CHR*<18)4C 
HR*<8)4CHR*(8)4CHR*(8)4CHR*<171)4CHR* 
<172)+CHR*<1?3) 

1878 CA*=CHR*<1?4)4CHR*<1?5)4CHR*<176 
)4CHR$(18)4CHR$(8)4CHR$(8)4CHRf(8)4CH 
W(177)4CHW(178)4CHW<179)4CHW<10)4 
CHR*(8)4CHR*<8)4CHR*<8)4CHR*<188)4CHR 
*(181)4CHR*(182) 

1888 RN*=CHR*(183)4 CHR$(184)4 CHR*(185 
)4CHW(18)4CHR$<8)4CHW(8)4CHR$(8)4CH 
M(186)4CHR$(187)4CHR»(188)4CHR$<18)4 
CHR*<8)4CHR*<8)4CHR*<8)4CHR*<189)4CKR 
*<190)4CHR*<191):RFTURN 
1898 PEN 2:F0R j=l 70 26 S7EP 6:F0R i 
=1 70 23 S7EP 6¡LOCATE i,j¡PRINT z*¡L 
0CA7E ¡43,ü¡PRINT x*¡NEXT¡NEXT 
1900 FOR ¿=4 TO 24 STEP 6:F0R i=l TO 
24 STEP ¿¡LOCATE i,¡¡PRINT x*¡LOCATE 
¡43,¡¡PRINT z*¡NEXT¡NEXT:K*=’ 1 2 3 
4567 8*¡PEN 1¡LOCATE 1,25:PR 
1NT * A B C D E F 0 K" ¡FOR 1=2 
70 24 STEP 3¡LOCATE 25,1¡PRINT M1D*< 
K*,I,1):NEXT 


¡LOCATE 18,1¡PRINT RN*¡LOGATE 4,1¡PRI 
NT CA*¡LOCATE 13,1¡PRINT R* 

1920 LOCATE 16,1¡PRINT AL*¡LOCATE 19, 
1¡PRINT CA*¡L0CA7E 22,1¡PRINT T*¡FOR 
1=1 TO 22 STEP 3¡L0CATE 1,4¡PRINT P*¡ 
NEXT 

1938 PEN 1¡LOCATE 1,22:PRINT T*¡L0CA7 
E 7,22:PR1NT AL*¡LOGATE 10,22¡PR1NT R 
N*¡LOCATE 4,22:PR1NT CAI¡LOCATE 13,22 
¡PRINT R* 

1948 LOCATE 16,22¡PRINT AL*¡LOCATE 19 
,22:PR1NT CA*:LOCATE 22,22¡PR1NT 7*¡F 
OR 1=1 TO 22 STEP 3¡L0CATE 1,19:PRINT 
P*:NEXT 
1958 RE7URN 

1968 'BORRADO E IMPRESION DE FIGURAS 
1978 IF (AfI OR A=3 OR Af 5 OR A=7) AN 
D (B=l OR 8=3 OR 8=5 OR B=7) THEN 200 

0 

1988 IF <Af2 OR A=4 OR Af6 OR Af8) AN 
D <8=2 OR 8=4 OR 8=6 OR 8=8) THEN 288 

0 

1990 PEN 0¡LOCATE A*A*A-2,B4B4B-2¡PRI 
NT Z*;GOTO 2810:'CUADRO NEGRO 
2888 PEN 2¡LOCATE A*A+A-2,B4B4B-2¡PRI 
NT Z*¡'CUADRO BLANCO 
2818 IF (0=1 OR 0=3 OR C=5 OR C=7) AN 
D <D=1 OR D=3 OR D=5 OR 8=7) THEN 204 
8 


2828 IF <0=2 OR 0=4 OR C=6 OR C=8) M 
D <8=2 OR D=4 OR D=6 OR 8=8) THEN 284 

8 

2838 PEN 0¡LOCATE C4C4C-2,D4D4D-2:PRI 

NT Z*:6OT0 2850¡'CUADRO NEGRO 

2048 PEN 2¡LOCATE C4C4C-2,D+D+D-2¡PRI 

NT Z*:'CUADRO BLANCO 

2858 PEN 1¡LOCATE C+C+C-2.D4D+D-2 

2868 IF M<A,B)= a PB a THEN PRINT P*:GO 

TO 2188 



2878 IF H*<A,B)= a PN a THEN PEN 3¡PRINT 
PliGOTO 2188 

2888 IF H*<A,B)= a TB a THEN PRINT 7*:G0 
TO 2188 

2098 IF H*<A,B)= a TN a THEN PEN 3¡PR1NT 
TiiGOTO 2188 

2188 IF H$<A,B)= , CB , THEN PRINT CA*¡G 
OTO 2188 

2118 IF H»<A,B)=‘CN- THEN PEN 3:PR1NT 
CA*¡60T0 2188 

2128 IF H*<A,B)= a AB a THEN PRINT AL*;G 
OTO 2180 



2138 IF H*<A,B)= a AN a THEN PEN 3:PRINT 
AL*¡GOTO 2188 

2148 IF H*<A,B)= , RB* THEN PRINT R*:60 
TO 2188 

2158 IF H*<A,B)= a »r THEN PEN 3¡PRINT 
RS¡GOTO 2188 

2168 IF HKA.B^’RNB’ THEN PRINT RN*¡ 
GOTO 2188 

2178 IF H*<A,B)=W THEN PEN 3:PR1N 
T RN* 

2188 PRINT CHR*<22);CHR*<8)¡LOCATE 28 
,4¡PRINT STRINW(10, a ^¡LOCATE 28,5¡ 
PRINT STRINWdB,’ ’)¡PRINT CHR*<22); 


1918 PEN 3:PRINT CHR*<22)}CHR*<1)¡L0C 
ATE 1,1¡PRINT T*¡LOCATE 7,1¡PRINT AL* 













CHRf<l>:PB4 1¡1F REPETIC10N=I THEN 22 
18 

2198 PP=PP4l:A$=STR$(A)¡B8=STR$<B)¡» 
=STR*<C) :0$=STR$<D): JUGADA$<PP)=A*4W 
4C8+M 

2208 1F H8(C,D)='RN' OR H*<C,D)='RB' 
THEN 2220 

2218 HI(C,D)=HÍ<A,B)¡Hf(A,B)=":RETUR 
N 

2228 REPETICI0N=1:U1ND0UK1,26,40,1,24 
¡CLS81¡LOCATEil,3,5:PR1NT*1,'QUEREIS 
VER':LOCATEIl,3,7:PR1NTI1,'LA PARTIDA 
?':L0CATE81,6,9¡PRINTI1,'S7N* 

2238 Af=INKEYS:IF A*=" THEN 2238 
2248 A$=UPPERÍ(A$):1F A*='S' THEN 225 
8 ELSE 1F A*='N' THEN 2370 ELSE 2238 
2258 HÍ(1,1)='TN , :HÍ<2,1)= , £N , :HI(3,1 
)='AN'¡Hf(4,l)=‘RNN':H*<5,1)=‘RN'¡H»< 
4,1)=W(3,1):»<7,1)=H»(2,1):H0(8,1)= 
H$<1,l):FOR 1=1 TO 8:H*<1,2)='PH-:NEX 
T 

2260 FOR 1=1 TO 8:H*<I,7)=’PB':NEXT:H 
*(1,8)= , TB‘ :H$(2,8)= , CB' ¡H$<3,8)='AB' 
:K$<4,8)='RNB' ¡H$<5,8)='RB' ¡H*<6,8)=H 
4(3,8):HÍ(7,8)=HI(2,8):H$(8,8)=HÍ(1,8 
) 

2270 CLS:60SUB 1898:JU6ADOR=2 
2280 FOR 1=1 TO PP:IF JU6AOOR=2 THEN 
JUGADOR=l:F1CHA$=*BLANCAS' ELSE JUGAD 
0R=2¡FICHA$='NE6RAS' 

2298 PRINT CHR*<22);CHR*<8)¡LOCATE 29 
,2¡PRINT'JUGADOR';JUGADOR:LOCATE 27,3 
¡PRINT'NUEVEN 'jF1CHA8:L0CATE 28,9:PR 
INT'JUGADA'¡I 

2388 A$=LEFT$(JUGADA$< 1) ,2) ¡A=MAL<A$) 
:1F Pf\ TKB< A$='A' ELSE IF A=2 THEN 
A$='B* ELSE 1F Af3 THEN A$='C' ELSE I 
F Af4 THEN A$='D' ELSE 1F Af5 THEN A* 
='E* ELSE 1F 0f6 THEN A$='F* ELSE 1F 
A=7 THEN A0='6‘ ELSE 1F A=8 THEN A$=' 
H* 

2318 B8=fflW<JUGADAÍ<I),3,2>¡B=UAL<» 
)¡LOCATE 28,11¡PRINT'DESDE '¡AÍ;B* 
2320 C$=M1D8(JUGADA>(1),5,2):0=VAL(CÍ 
):IF 0=1 THEN W='A* ELSE 1F 02 THEN 
CO'B* ELSE 1F 03 THEN «='C' ELSE 
1F 04 THEN CO'D' ELSE IF 05 THEN C 
0='E' ELSE IF O6 THEN C$='F' ELSE IF 
07 THEN C*='6' ELSE IF 08 THEN C$= 
■H' 

2330 D$=RIGHTt(JU6A0AKI) ,2) :OMAL(DI 
)¡LOCATE 28,12:PR1NT*HASTA '¡»;M:PR 
INT CHRÍ(22);CHR»(1) 

2348 60SU8 1970 

2358 L<=INKEY$¡1F LO" THB1 2358 ELS 
E NEXT 

2368 60T0 2228 

2378 CLS01¡LOCATE 6,12:PRINT'QUEREIS 
JUGAR'¡LOCATE 6,13:PR1NT'0TRA PARTIDA 

?' 


2388 A01NKEY$¡IF A«=" THEN 2388 ELS 
E A$=UPPEW<A0) 

2398 IF AO'S' THEN 118 ELSE IF AO'N 
' THEN CLS¡NEW ELSE 2398 
2408 ANT$=H8(A,B)¡POSTOHt(C,D):HÍ(C, 
D)=H$(A,B) :HÍ(A,B)="JAQUE AL REY B 
LANCO 

2418 FOR 1=1 TO 8:F0R J=1 TO 8:1F »< 
1 ,J)='RB' THEN 2428 ELSE NEXT¡NEXT 
2428 RX=1¡RY=J 

2430 FOR 1=1 TO 8:F0R J=1 TO 8¡IF R1G 
HTi(H0(l,J),l)='N' THEN GOSUB 2468 
2448 IF SU08 THEN RETURN ELSE NEXT:N 
EXT 

2458 GOTO 2668¡'NO HAY JAQUE 
2460 IF H$(l,J)=*PN' THEN 2470 ELSE I 
F H$(l,J)='TN' THEN 2488 ELSE IF H*(I 
,J)='CN' THEN 2558 ELSE IF HÍ(I,J)='A 
N' THEN 2568 ELSE IF H$(1,J)='RW' TH 
EN 2628 ELSE IF Hf(I,J)='RN' THEN 263 
8 

2478 IF <I41=RX AND J4l=RY) OR <I-1=R 
X ANO J4l=RY) THEN 2648 ELSE RETURN 
2488 IF 1=RX TH8I 2498 ELSE IF J=RY T 
HEN 2528 ELSE RETURN 
2498 IF J<RY THEN 2588 ELSE 2518 
2588 FOR L=J4l TO RY-1¡IF H8(1,L)<>" 
TK04 RETURN ELSE NEXT¡GOTO 2640 
2518 FOR L=RY4l TO J-l:1F W(I,L)<>" 
THEN RETURN ELSE NEXT¡GOTO 2648 
2528 IF I<RX THEN 2538 ELSE 2548 
2538 FOR L=I41 TO RX-1 ¡IF HÍ(L,J)<>" 
THEN RETURN ELSE NEXT¡GOTO 2648 
2548 FOR L=RX4l TO 1-hlF W(L,J)<>" 
THEN RETURN ELSE NEXT¡GOTO 2648 
2558 IF <141=RX AND J-2=RY) OR <H2=R 
X AND J-1=RY) OR <h2=RX AND J4l=RY) 


OR (I+1=RX AND J42=RY) OR <I-1=RX AND 
J42=RY) OR <I-2=RX AND J41=RY) OR <1 
-2=RX WD J-1=RY) OR <I-1=RX WD J-2= 
RY) THEN 2648 ELSE RETURN 
2568 AX=1¡AY=J¡1F ABS<I-RX)=ABS<J-RY) 
THEN 2570 ELSE RETURN 
2578 IF ]<RX AND J>RY THEN 2588 ELSE 
IF RX<I AND RY)J THEN 2598 ELSE IF I< 
RX AND J<RY THEN 2688 ELSE 2618 
2588 AX=AX41¡AY=AY-1¡1F AX)RX-1 THEN 
2648 ELSE IF HNAX,AY)0" THEN RETUR 
N ELSE 2588 

2598 AX=AX-1:AY=AY41¡1F AX<RX4l THEN 
2640 ELSE IF H$(AX,AY)<>" THEN RETUR 
N ELSE 2590 

2608 AX=AX41¡AY=AY41¡1F AX)RX-1 THEN 
2648 ELSE IF HÍ(AX,AY)<>" THEN RETUR 
N ELSE 2688 

2618 AX=AX-1:AY=AY-1¡1F AX<RX4l THEN 
2648 ELSE IF HKAX,AY)<>" THEN RETUR 
N ELSE 2618 

2620 IF ABS(1-RX)=ABS<J-RY) THB* AX=1 
:AY=J:60T0 2570 ELSE 2480 
2638 IF (1=RX AND J-1=RY) OR (I=RX AN 
D J41=RY) OR (I-1=RX AND J-1=RY) OR < 
I-1=RX AND J=RY) OR <1-1=RX AND J41=R 
Y) (» (141=RX AND J-1=RY) OR (l4l=RX 
AND J=RY) OR (I-1=RX AND j4l=RY) THEN 
2648 ELSE RETURN 

2648 IF JUGADORA THEN SW=1 ELSE LOCA 
TE 31,14:PRINT'JAQUE':SW=2 
2658 H$<A,B)=ANT4:H$<C,D)=P0ST$:RETUR 
N 

2668 FOR 1=1 TO 8:F0R J=1 TO 8¡IF H$< 
1,J)='RN' THEN 2678 ELSE NEXT¡NEXT 
2678 RX=I¡RY=J 

2688 FOR 1=1 TO 8:F0R J=1 TO 8¡1F R1G 
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HT$(H$(I,J)(D^B’ THEN BOSUB 2718 
2690 1F SU08 THEN RETURN ELSE NEXT:N 
EXT 

2788 H$(A,B)=ANT$:H$<C,D)=POSTf:RETUR 
N:'N0 MY JAQUE 

2718 1F Hld ,J) =, PB* THEN 2728 ELSE 1 
F H»<1,J)= , TB* THEN 2730 ELSE 1F Kt(I 
,J)=”CB' THEN 2888 ELSE IF H$d,J)='A 
B' THEN 2818 ELSE 1F HUI.JX'RNB' TH 
EN 2878 ELSE IF Hf(I,J)="RB- THEN 288 
I 

2728 IF <H1=RX AND J+1=RY) OR d-l=R 
X AND J+1=RY) THEN 2890 ELSE RETURN 
2738 IF 1=RX THEN 2748 ELSE IF J=RY T 
HEN 2778 ELSE RETURN 
2748 IF J<RY THEN 2750 ELSE 2768 
2750 FOR L=J+1 TO RY-1 :IF Hfd,LX>" 
THEN RETURN ELSE NEXT:60T0 2898 
2768 FOR L=RY-*1 TO J-l:1F HÍd,LX>" 
THEN RETURN ELSE NEXT:60T0 2898 
2778 IF I<RX THEN 2788 ELSE 2798 
2788 FOR L=H1 TO RX-1 :IF W(L,J)<> >a 
THEN RETURN ELSE NEXT:60TO 2898 
2798 FOR L=RXd TO 1-lsIF HKL.JX)" 
THEN RETURN ELSE NEXT¡GOTO 2898 
2888 IF dd=RX AND J-2=RY) OR (X2=R 
X ANO J-1=RY) OR (I42=RX AND J+1=RY) 


OR (141=RX #FD J42=RY) OR d-l=RX AND 
J42=RY) OR d-2=RX MD J4l=RY) OR (I 
-2=RX AND J-1=RY) OR d-l=RX WD J-2= 
RY) THEN 2890 ELSE RETURN 
2818 AX=1 :AY=J:1F ABSd-RX)=ABS(J-RY) 
THEN 2828 ELSE RETURN 
2828 IF ]<RX WD J)RY THEN 2838 ELSE 
IF RX<1 ANO RY>J THEN 2848 ELSE IF I< 
RX ANO J<RY THEN 2858 ELSE 2868 
2838 AX=AX4l:AY=AY-l:IF AX)RX-1 TH0F 
2898 ELSE IF Hf<AX,AYX>" THEN RETUR 
N ELSE 2838 

2848 AX=AX-l:AY=AY4l:IF AX<RX4l THEN 
2898 ELSE IF H*<AX,AYX>" THEN RETUR 
N ELSE 2848 

2858 AX=AX4l¡AY=AY4l:IF AXXRX-l THEN 
2898 ELSE IF H*(AX,AYX>" THEN RETUR 
N ELSE 2858 

2868 AX=AX-1:AY=AY-1:1F AX<RX4l THEN 
2898 ELSE IF H»<AX,AYX>" THEN RETUR 
N ELSE 2868 

2878 IF ABS(I -RX)=ABS(J-RY) THEN AX=I 
:AY=J:GOTO 2828 ELSE 2730 
2888 IF d=RX AND J-1=RY) OR d=RX AN 
D J41=RY) OR d-l=RX tfFD J-1=RY) OR ( 
I-1=RX AND J=RY) OR (I-1=RX #FD J41=R 
Y) OR < 1 41=RX AND J-1=RY) OR d4l=RX 
AND J=RY) OR (H=RX AND J4l=RY) THEN 
2898 ELSE RETURN 

2898 H$<A,B)=ANTÍ:H$(C,D)=P0STÍ:1F JU 
6AD0fi=2 THEN SW=1 ELSE LOCATE 31,14:P 
R1NT*JAQUE'¡SU=2 
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n siempre avanza,nunca puede retroced 
er. 

2920 PRINT'Si es la primera vez que s 
e mueve el pe-on, este puede avanzar 
dos casillas, en los demas casos solo 
una. 

2938 PRINT'El peón captura en diagona 
1 avazando si-empre un paso, esto da 
la oportunidad al peón de cambiar de 
columna. Si el peón encuentra alguna 
pieza Frente a si, se dice que esta 
bloqueada ya que no puede avanzar 
2948 a*=INKEY*:lF a«=" THEN 2948 
2950 CLS:LOCATE 19,1:PRINT T*:PRINT:P 
R1NT* La torre se juega siempre en li 
nea rec-ta, tanto en sentido vertical 
cono hori-zontal.':PRlNT'Puede captu 
rar piezas enemigas de la misma Forma 
que se nueve 

2968 a*=INKEYÍ:lF a$=" THEN 2968 
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2978 CLS:LOCATE 19,1:PRIKT AL*:PR1NT: 
PRINT" El al-fi 1 se nueve en diagonal, 
al igual que la torre captura de la 
nisna torna en que se juega. 

2988 PR1KT" Ha/ dos altiles en cada u 
no de los ban-dos : uno sobre casilla 
s blancas y otro sobre negras, los cu 
ales han de pernane-cer sobre diagona 
les del nisno color. 

2998 a$=lNKEY$:lF a*=" THEN 2998 
3888 CLS:LOCATE 19,1:PR1NT RN*:PRINT: 
PRINT* La daña es la pieza de nayor 
canpo de acción porque su novinento e 
s una conbi-nacion de los ya conocido 
s de la torre y del altil. Esta puede 
noverse en diago-nal, horizontal y v 
ertical. 

3818 a$=lNKEY*:lF a$=" THEN 3818 




LETRA,HUMERO 

DESDE i 




3828 CLSiLOCATE 19,1¡PRINT r$:PRINT:P 
R1NT' El rey tiene el nisno novinient 
o que la daña ; horizontal,vertical y 
diagonal. Pero nientras la daña pu 
ede nover las casillas que quiera el 
rey solo pude ser jugado a las casi 11 
as contiguas de una* 


3838 PRINT* en una excepto cuando se 
realiza el en-roque (nover a la vez e 
1 rey y la torre) 

3848 PRINT* El rey es el elenento tu 
ndanental del juego. Hay que proteger 
lo del ataque de las piezas contraria 
s, al nisno tienpo, tendernos que ata 
car su rey. 

3858 n*=*ABCDEFGH*¡PRINT CHR*(22);CHR 
1(1)¡FOR i=ll TO 29 STEP ¿¡LOCATE i,2 
0:PRINT i$ ¡NEXT¡PEN 2¡L0CATE 29,28:PR 
1NT ti¡LOCATE 28,28:PR1NT rl¡j=8:F0R 
i=9 TO 38 STEP 3:j=j+l¡LOCATE i,24:PR 
INT MJM(n$,j,l):NEXT 
3068 PEN 1¡FOR 1=1 TO 588¡NEXT:a*=lNK 
EY1:1F a$=" THEN 3878 ELSE 3128 
3878 1F SU1TCW=1 THEN 3088 ELSE IF SU 
1TCH=8 THEN 3898 

3888 PRINT CHR1(22);CHR1(8)¡PEN 1¡LOC 
ATE 23,20¡PRINT Z!¡LOCATE 26,28:PR1NT 
XI¡PEN 2¡LOCATE 8,20¡PRINT TI¡LOCATE 
28,28¡PRINT R$:F0R 1=1 TO 58¡LOCATE 
13,18:PRINT*ENROQUE LAR60*¡NEXT¡GOTO 
3188 

3898 PRINT CHRK22) ¡CHR1<8) ¡LOCATE 14 
,28¡PRINT XI¡PEN 1¡LOCATE 17,28:PR1NT 
Z1:PEN 2:L0CATE 28,28:PR1NT R*:PRINT 
CKR$(22);CHR1(1)¡LOCATE 29,28¡PRINT 
TI¡PRINT CKR!(22);CHR$(0):FOR 1=1 TO 
58¡LOCATE 13,18:PRINT*ENR0QÜE CORTO*¡ 
NEXT¡GOTO 3118 

OCATE 29,28¡PRINT Z1:PEN 2:L0CATE 23, 
28¡PRINT TI¡FOR 1=1 TO 3888¡NEXT¡GOTO 
3868 

3128 CLEAR 1NPUT¡CLSiLOCATE 19,1¡PRIN 
T CAS:PR1NT¡PRINT* Ninguna pieza pued 


e pasar por encina de otra excepto el 
caballo. Este salta en toma de L,es 
decir,desde la casilla que ocupa pue 
de noverse a otra que diste 2 casilla 
s horizontales y una vertical o 
3130 PRINT'alreves,hacia atras o haci 
a adelante 

3148 LOCATE 16,16¡PR1NT z*:L0CATE 22, 
1¿¡PRINT zf¡LOCATE 19,19:PR1NT z*:L0C 
ATE 16,22:PR1NT ii ¡LOCATE 22,22:PR1NT 
z$ 

3158 FOR i=l TO 1880¡NEXT:a*=lNKEY$:l 
F a$=" AND SW1TCH=1 THEN 3168 ELSE I 
F a$=** AND SW1TCH=8 THEN 3178 ELSE R 
ETURN 

3168 PRINT CHR$(22)¡CHR$(1):PEN 2:SU1 
TCK=0¡LOCATE 16,16:PR1NT ca*:F0R i=l 
TO 400¡NEXT¡PEN 1¡LOCATE 16,16¡PRINT 
z$:PEN 2¡LOCATE 19,22¡PR1NT ca*:F0R i 
=1 TO 488¡NEXT¡PRINT CHR$<22);CHR»<8) 
¡LOCATE 19,22:PR1NT x^:6QT0 3150 
3178 PRINT CHR$(22);CHR$(1)¡PEN 2:SUI 
TCK=1¡LOCATE 16,16:PR1NT ca*:F0R i=l 
TO 400¡NEXT¡PEN 1¡LOCATE 16,16¡PRINT 
z*:PEN 2¡LOCATE 22,19:PRINT ca$:F0R i 
=1 TO 488¡NEXT¡PRINT CHR$(22);CHR$<8) 
¡LOCATE 22,19:PR1NT x*:60T0 3150 
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Gigantes te espera cada martes en tu kiosco. Uno revista impres¬ 
cindible para todo aficionado. Gigantes del Basket te ofrece las 
últimas noticias, las mejores fotos, las opiniones que te interesan, 
las entrevistas que esperas, las anécdotas que te divierten y los 
los comentarios que te gusta conocer. 

Pídela todas las semanas, porque Gigantes da la talla. 




Trivial: 


Un juego impresionante! 


¿Te lo imaginas 
en tu ordenador? 
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Fairught 

AMSTRAD PCW 


Después de un día duro y trabajado, Ivar puso rumbo al hogar. En su mente 
ruda y campesina, pero inteligente, siempre estaba la misma pregunta: ¿Por 

qué debía trabajar de sol a sol? 



encontrar explicación a este 
hecho, llegó a la taberna del 
pueblo donde siempre se tomaba 
una jarra de vino mientras 




hablaba con los amigos. En la 
puerta de la taberna vio clavado 
un bando y lo leyó con 
detenimiento. Este era su 
contenido: 

«El señor de Cakchi busca un 
hombre valeroso capaz de salvar 
al mago del feudo y a su libro 
mágico que se hallan prisioneros 
en el castillo de Avar. Si deseas 
cumplir esta misión, preséntate sin 
demora. El que logre liberar al 
mago y a su libro será 
grandemente recompensado.» 

Ivar no lo pensó más y puso 
rumbo al castillo de Cakchi. 
Cuando estuvo en presencia del 
poderoso amo del feudo, éste le 
preguntó si sabía utilizar la 
espada, a lo que Ivar contestó 
que no, pero que con un poco de 
práctica aprendería. 


Después de la audiencia, Ivar se 
pertrechó como correspondía a la 
misión que iba a emprender y a 
lomos de su brioso corcel se 
dirigió al castillo de Avar. Al 
llegar a la entrada del castillo se 
percató de que el puente levadizo 
estaba bajado y, muy extrañado 
por esto, entró hasta el patio de 
armas. 

Lo estaba reconociendo cuando 
repentinamente y de la nada, vio 
cómo se formaba la espectral 
reencarnación de un guerrero. 
Ahora entendía el por qué de esa 
aparente falta de vigilancia, así 
como la magnitud de la tarea que 
iba a emprender. 

Como nosotros tenemos otra por 
delante, y no menos importante 
que la de Ivar, dejaremos a éste 
espada en ristre y cogeremos la 
pluma para relatar los 
pormenores que nos han sucedido 
con FAIRUGHT, juego realizado 
por THE EDGE. 

Y para que no sucedan cosas 
deberemos cargar el sistema 
operativo, que viene con el 
equipo, ya que el juego no lo trae 
incorporado. 

Después de cargado, aparecerá 
en pantalla un «lienzo» en el que 
podremos ver un castillo que se 
halla en las cercanías del mar. 


Pulsamos una tecla, y aparecerá 
el menú donde se nos indicará 
cómo movernos, saltar, luchar, 
seleccionar objetos y utilizarlos, 
etc. 

El por qué de esta explicación se 
halla en que también podemos 
usar las teclas del cursor, a 
nosotros nos parece menos lioso, 
y esto no queda muy claro en el 
menú. 

Para saltar en la dirección que 
queramos, deberemos mantener 
pulsada la tecla de la dirección en 
queramos ir y presionar la tecla 
MAYS. 

Pues una vez que ya hemos 
aclarado ésto o, por lo menos, lo 
hemos intentado, podemos seguir 
adelante en nuestra importante 
tarea de salvar al mago y a su 
libro. 

Pero si queremos que nuestra 
energía vital no disminuya, 
tenemos que estar atentos al 
indicador en pantalla y procurar 
evitar el contacto de torbellinos, 
soldados reencarnadaos, gigantes 
barbudos y monjes negros. 

Todos ellos son peligrosos, su 
contacto es mortal si es muy 
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largo, pero unos lo son más que 
otros. Veamos: 

MONJES NEGROS. Desde el 
momento en que aparezca uno en 
pantalla no dejará de 
perseguirnos. Son indestructibles. 
SOLDADADOS REENCARNADOS. 
Aparecen en pantalla desde 
debajo de su casco. Son duros de 
pelar, pero después de un arduo 
enfrentamiento se les puede 
vencer. Una vez muertos se debe 
recoger su casco, ya que si no, 
volverán a aparecer y nos 
atacarán de nuevo. 

GIGANTES. Son grandes y 
poderosos. Llevan una porra con 
ia que nos golpearán desde el 
momento en que nos vean. Se les 
puede matar con unos cuantos 
golpes de espada. Un 
«fenómeno» que hemos dejado 
para el final lo forman los 
TORBELLINOS, que veremos 
aparecer casi en cualquier 
pantalla. Estos voraces elementos 
meteorológicos destrozan todos 
los objetos que pillen a su paso, 
así como nos restarán energía si 
nos tocan. 

Ya que hemos hablado de 
objetos, vamos a describir para 
qué sirve cada uno. 

EL PAPIRO. Sirve para 
teletransportarnos. Se encuentra 
en el patio de armas del castillo, 
o sea en la primera pantalla. 

LA CORONA. Junto con el libro 
mágico, sirve para terminar el 
juego. Se encuentra encima de la 
puerta inferior del patio de armas. 
Para llegar a alcanzar la 
CORONA es necesario uno de los 
Utilísimos BARRILES que podremos 
encontrar en algunas de las 
dependencias del castillo. LLAVES, 
hay ocho y cada una sirve para 
abrir una puerta determinada. 
CIRCULO ENERGETICO. Se 
encuentra flotando en muchos 
corredores y pasadizos. Su 
contacto nos confiere mayor 


velocidad, pero nos restan 
energía vital. 

OBJETOS ALIMENTICIOS. Nos 
reponen energía y es interesante 
utilizarlos cuando nos encontremos 
exhaustos. Los objetos son: un 
pollo, un botijo, un reloj y una 
barra de pan. 

POCION Y CRUZ. Dan paso a 
algunas pantallas que de otra 
forma sería imposible. 

EL LIBRO DE LA LUZ. Una vez 
que lo tengamos, junto con la 
CORONA como ya hemos dicho, 
habremos terminado la misión. El 
LIBRO DE LA LUZ se halla situado 
en una remota galería 
subterránea del castillo. 

FAIRLIGHT está confeccionado 
con la interesante técnica de 
«FILMATION», por lo que vemos 
pasar por la pantalla de nuestro 
ordenador una película dentro de 
la que nos sentimos plenamente 
integrados, más aun si tenemos en 
cuenta que en esta ocasión el 


ángulo visual se ha subido, o sea, 
tenemos una vista más de 

«pájaro». 

Gráficamente es bueno, pero 
pensamos que se podría mejorar 
la definición. 

La animación está bien realizada 
y, tanto Ivar como todos sus 
oponentes se mueven con una 
velocidad acertada. También está 
muy bien logrado el movimiento 
de pelea que nos recuerda un 
poco al esgrima. Pues otro juego 
para PCW y, cada día son más, 
que pensamos está bien realizado. 
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Pascal o basic 

HE AQUI EL DILEMA 


Francisco G.R. 


A la hora de elegir el aprendizaje de 
un lenguaje de programación se nos 
plantea la duda de cuál elegir entre los 
existentes , y una vez dentro de estos, 
cuál puede tener mayor porvenir. 
Nosotros vamos a intentar ver algunas 
de las diferencias entre los 
lenguajes de programación Basic y 
Pascal para que usted mismo pueda 
comparar estos dos lenguajes. 



IDw S3W efiriéndonos a la 
saga de los ordenadores Amstrad 
tenemos que decir que existen 
varios compiladores de Pascal y 
de Basic. Dentros de estos últimos 
tenemos que destacar el MBASIC 
y el CBASIC, aparte del Mallard 
Basic, que contienen los PCWs y 
el Basic Locomotive que lleva 
grabado en ROM los CPCs, como 
los compiladores o lenguajes Basic 
más importantes existentes en 
nuestro país a la venta (hecho 
muy importante el que podamos 
disponer de ellos en caso de 
necesidad). Referente a 
compiladores de Pascal debemos 
destacar el Pascal MT-PLUS y el 
Pascal de Hisoft, ambos también 
disponibles en las listas de 
software españolas. Existen otros 
compiladores de Pascal que aún 
no han llegado, y esperemos que 
lleguen pronto como puede ser el 
famoso magnífico Turbo Pascal. 
Cada uno de los anteriores 
compiladores tanto para Basic 
como para Pascal tienen 
diferencias notables según la 
necesidad de que precisemos. 
Mientras el MBASIC de Microsoft 
está débil en la cuestión de 
ráficos, el CBASIC, podríamos 
ecir que es todo lo contrario. En 
el Pascal de Hisoft y el Pascal- 
MT+ también las hay, uno opera 
mejor los ficheros que el otro, 
mientras con el MT-PLUS nos 
permite mayor capacidad para 
nuestros programas el Pascal de 
Hisoft se potencia con mayor 
facilidad de manejo de ficheros. 

El lenguaje Basic prácticamente 
todo el mundo lo conoce aunque 
sólo sea de oídas, mientras el 
Pascal no tanto. Esto puede ser 
debido a que este último sea un 


lenguaje más científico y 
considerado como lenguaje de 
alto nivel, y el Basic por su fácil 
asimilación se le haya rebajado a 
un uso más corriente, quitándole 
la potencia del cual se merece. 
Podríamos decir refiriéndonos al 
lenguaje Pascal que es menos 
conocido, que es un lenguaje 
estructurado, que contiene una 
potencia de trabajo superior a 
otros lenguajes (en cuatro 
palabras podríamos decir que 
diciendo menos dices más), la 
incorporación de procedures que 
le dan una gran potencia al restar 
del sistema los saltos a subrutinas, 
potenciando estas procedures que 
pueden incluso llamar a otras e 
incluso llamarse a sí misma 
operando con las variables que 
contiene dentro de sí. También 
podemos decir que está dotado 
de procedimientos recursivos, tal y 
como nos habíamos referido 
anteriormente al hecho de 
cambiar las variables y llamarse 
luego a sí mismo. 

Diferencias en la práctica 
y similitud 


Hemos creado dos programas 
uno que nos pasa los grados 
centígrados a grados Fahrenheit, 
y un segundo que nos representa 


unas curvas senoidales y 
cosenoidales. 

El primero es el paso de grados 
de una escala a otra. Vamos a 
ver el listado escrito en Pascal y a 
continuación escrito en Basic: 


Programa 'CALCULO' 

Función: Calcula grados 
centígrados a grados Fahrenheit. 

Realización: Pascal. 

Listado: 

PROGRAMA CALCULO (INPUT, 
OUTPUT) 

CONST CONVERSION = 1.8; 

DESPLA = 32.0; 

VAR CENTEMPdNTEGER; 

FAHRTEMP:REAL; 

( *Comienzo del cuerpo del 
Programa principal* ) 

BEGIN 

WRITELN('CENTIGRADOS 

FAHRENHEIT'); 

READ(CENTEMP); 

FAHRTEMP: =CENTEMP*CON- 
VERSION 
+ DESPLA; 

WRITE(CENTEMP:2,' ':9,FAHR- 
TEMP:7:1) 

END 

Descripción del programa. 

Lo primero que designamos es 
el nombre del programa que 
denominaremos 'CALCULO', el 
cual está definido como un fichero 
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de entrada y salida estándar en la 
máquina que dispongamos. Esto 
se refiere que los datos entrarán 
por el teclado y saldrán por la 
pantalla. Seguidamente 
declaramos las variables que 
vamos a necesitar en la 
realización de nuestro programa: 

- CONVERSION 

- DESPLA 

- CENTEMP 

- FARHRTEMP 

Siendo las dos primeras 
variables constantes, la tercera es 
una variable entera y la última la 
definimos como una variable real. 
Una vez definidas las variables 
comenzaremos con la creación del 
programa en la cual la orden 
'BEGIN' es la encargada del 
comienzo del mismo, para que el 
sistema pueda reconocer la 
entrada. La segunda función 
escrita en un 'WRITELN', que es 
la equivalente como después 
comprobaremos a un 'PRINT' a 
secas. Luego tenemos una nueva 
instrucción dentro de nuestro 
programa, se trata de 'READ', 
esta instrucción se puede definir 
como un 'INPUT' en Basic. A 
continuación tenemos una serie de 
cálculos que bien podríamos 


traducir por un 'LET' con un valor 
tras el resultado de unas 
operaciones. Para finalizar 
tenemos que nos escribe en la 
pantalla el resultado obtenido del 
paso de una unidad a otra, y el 
final de la ejecución. 

Como hemos podido comprobar 
hay ciertos símbolos que forman 
parte del léxico del Pascal, estos 
símbolos son, por ejemplo, los 
puntos y comas que aparecen al 
final de una línea, con lo cual 
indica que esa línea de programa 
ha terminado, cosa que en Basic 
se denota cuando se encuentra la 
numeración de la siguiente línea. 
Pero al revés que en el Basic es 
obligatorio colocar un número 
para ver que efectivamente se ha 
acabado la anterior, en Pascal 
hay varios casos en los cuales no 
se denota el punto y coma. Estos 
casos pueden al principio del 
programa, después de un 
'BEGIN', antes de producirse un 
'END', etc. Otro símbolo 
particular es el punto que 
insertamos después del 'END.', 
éste lo indicamos para expresar 
que esta es la última línea del 
programa. 

También podemos observar que 
existe una línea que está 
encerrada entre paréntesis, esto 


nos indica que lo que a 
continuación sigue es un 
comentario que el ordenador no 
lo tiene encuenta a la hora de 
correr el programa, sino que más 
bien es una ayuda al 
programador para localizar las 
partes de su programa. Estas 
iíneas símiles en Basic con el 
'REM', van precedidas por un 
paréntesis y a continuación un '*'. 

A continuación tenemos el 
mismo programa realizado en 
Basic para poder observar mejor 
las diferencias: 

Programa 'CAMBIO' 

Función: Calcula grados 
centígrados a grados Fahrenheit. 

Realización: Basic. 

Listado: 

10 LET CONVERSION = 1.8 
20 LET DESPLA = 32.0 
30 INPUT CENTEMP 
40 LET FAHRTEMP = CENTEMP* 
CONVERSION* DESPLA 
50 PRINT "CENTIGRADOS 
FAHRENHEIT" 

60 PRINT 
CENTEMP;" 

FAHRTEMP 
70 END 

Descripción del programa. 

La descripción del programa se 
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ha realizado anteriormente, pero 
debemos dejar constancia que no 
era necesario el tener que escribir 
el comando 'LET', pero en Basics 
diferentes al de los CPC de 
Amstrad, hay que denotarlo. 

El segundo programa que 
vamos a ver se trata de realizar 
la representación en pantalla de 
unas curvas senoidales y 
cosenoidales: 

Programa 'CURVAS' 
Función: Representación de una 
función. 

Realización: Pascal. 

Listado: 

PROGRAM 

CURVAS(INPUT,OUTPUT) 

CONST H= 34 

C= 6.2831; (* 2 * 
Pl*) 

VAR X,Y,D :REAL ; 

l,N,S,LIM:INTEGER 

BEGIN 

READ(D,S,LIM); 

FOR 1:0 TO LIM DO 
BEGIN 

X: = D*1; 

Y: = EXP(—X)*SIN(C*X); 

N: = ROUND(S*Y) + H; 

WHILE N = 0 DO 

BEGIN 

WRITE(' 

N: = N—1 
END; 

WRITELN('*') 

END 

END. 

Descripción c!el programa. 

Como siempre denotamos el 


nombre del programa y el tipo de 
programa del cual se va a tratar, 
en este caso será de nuevo un 
programa de salida por pantalla y 
entrada de datos por teclado. A 
continuación definimos las 
variables siempre comenzando 
por las variables constantes y 
seguidamente las reales y enteras: 

— H Variable constante 

— C Variable constante 

— X Variable real 

— Y Variable real 

— D Variable real 

— I Variable entera 

— N Variable entera 

— S Variable entera 

— LIM Variable entera 

Una vez definidas todas ellas, 
comenzaremos con la estructura 
del programa. Este comenzará 
con un 'BEGIN', a continuación le 
precerá un 'READ' (entrada de 
dato por el teclado), y se iniciará 
un bucle que irá desde 0 hasta la 
variable 'LIM'. Luego tendremos 
el comienzo de una subrutina que 
también podíamos haber puesto 
en forma de procedure, en esta 
parte nueva del programa vamos 
calculando los valores para que 
más tarde se representen 
gráficamente en la pantalla. 

Luego tenemos la parte en la cual 
se encarga de representar la 
curva, la cual debe de ir mediante 
'WRITELN' (instrucción igual que 
un Print en Basic, imprime y se 
pasa a la siguien línea) o 'WRITE' 
(ésta la podríamos igualar como 


un Print seguido de un punto y 
coma, o sea, que el siguiente 
carácter a imprimir se coloque a 
continuación del anterior escrito). 

Y finalizaremos con el 'END." 

Ahora lo vamos a desarrollar en 
Basic: 

Programa 'GRAFICO' 
Función: Representación de una 
función. 

Realización: Basic. 

Listado: 

10 LET H = 34 

20 LET C = 6.2831:REM 2*PI 
30 INPUT D,S,LIM 
40 FOR 1 = 0 TO LIM 
50 X = D*l 

60 Y = EXP(—X)*SIN(C*X) 

70 N = ROUND(S*Y) + H 
80 WHILE N = 0 
90 PRINT " 

100 LET N = N + 1 
110 WEND 
120 PRINT 
130 NEXT I 
140 END 

Como podemos comprobar la 
estructura de uno y otro son 
prácticamente casi idénticas, lo 
hemos intentado realizar de una 
manera idéntica para que el lector 
pueda comprobar la similitud 
entre los diferentes comandos y la 
nomenclatura a seguir. La 
diferencia grande de uno a otro 
la podríamos tener y de hecho la 
hay en el desarrollo y cálculo de 
una a la otra, siendo el programa 
compilado en Pascal más rápido 
que compilado en Basic. 
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CHALLENGE 

GAME 


VIRGIN 


VIRGIN 
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• SHOGUN: 

Emocionante arcade-aven- 
tura con más de 128 panta¬ 
llas. Control de imágenes 
mediante iconos. AS 101 

• DAN DARE: 

Uno de los más famosos 
héroes de las tiras de có¬ 
mics de todos los tiempos. 
AS 105 

• ATLANTIC 
CHALLENGE: 

Una excitante y divertida 
simulación. 100% código 
máquina. Alta resolución. 
AS 104 

• ALADIN'S CAVE: 

Divertido juego de arcade. 
Deberás vencer al malvado 
genio de la lámpara má¬ 
gica. AS 102 

• STAR COMMANDO: 

Maravillosa perspectiva en 
3D. 16 Sectores de galaxia. 
97% de código máquina. 
Acción rápida. AS 103 

• STRANGELOOP: 

Increíble riqueza gráfica. 
Carga rápida. 250 lugares 
diferentes. Control me¬ 
diante joystick. AS 100 

PROGRAMAS DE 
IMPORTACION: 

PI100-ALKAHERA 
PI101-SUPER SAM 
PI109-6 PACK PLUS (6 juegos) 
GS101-ALINEADOR DE CABEZAS 
PI112-INTERNA TIONAL KARA TE 
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CUCAL 


¡Maldita cucaracha! Un arcade con una buena presentación 
y en el ' que nuestra habilidad y reflejos serán 
indispensables para conseguir el éxito. 




I comenzar el 
juego aparecen las instrucciones 
y teclas de uso. El juego consta de 
diez fases distintas, las cuales, 
aumentan en dificultad a medida 
que vamos pasándolas. En cada 
fase hay tres frutas (excepto en la fa¬ 
se diez que hay tres llaves), las cua¬ 
les nos dan la posibilidad de pasar! 
a una fase superior después de ha¬ 
ber sido comidas. 

En las fases 4, 6, y 8 podrán ver 
una bombillita, la cual, no se puede 
coger aparentemente, pero se darán 
cuenta que al comer las tres manza¬ 
nas que hay en estas fases se abre 
la puerta de salida y, además, desa¬ 
parece una mina de la pantalla, la 
cual, nos deja la posibilidad de co¬ 
ger la bombilla que, por supuesto no 
es obligatoria. 

Y se preguntarán: ¿Para qué sirve 
esto de las bombillas?, pues sirve pa¬ 
ra que al llegar a la fase n° 9 (fase 
oscura) tengamos luz, es decir, si du¬ 
rante nuestro recorrido hemos cogi¬ 
do las tres bombillas en la fase n° 9 
podremos ver la situación de las mi¬ 
nas, de lo contrario, las minas no 
aparecerán, pero se encuentra en su 
lugar. 

Después de haber cogido las tres 
llaves de la fase n° 10 y haber sali¬ 
do verán cómo aparece un letrero de 
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enhorabuena, se rodea la pantalla 
de minas y después de haber sona¬ 
do cuatro veces la música y de ha¬ 
ber pasado otras cuatro veces dos 
cucarachas aparecerá un letrero que 
nos dice que pulsemos la letra a pa¬ 
ra jugar otra vez. 

Si, por el contrario, nuestra misión 
fracasa y nos matan las tres vidas, 
veremos como un final, una bota 
aplastando a una cucaracha y un le¬ 
trero que nos dice que pulsemos la 
s para jugar otra vez. 

En cada fase y para dificultar la 
misión, habrá una bota que intenta¬ 
rá pisarnos. 

Para que vosotros podáis ver to¬ 
das las fases sin que os moleste la bo¬ 
ta, aquí os doy el remedio. 
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Añadid la línea: 

145 u = 1: q = 1 

Estas variables dan las coordena¬ 
das a la bota, por lo tanto, veréis 
que la bota aparece en la esquina 
superior izquierda del monitor. 

Las vidas que quedan se represen¬ 
tan por un cucaracha y cuando te 
matan, la cucaracha se convierte en 
un esqueleto. 

El juegoitien^^gujjfl^Sfl^ffls va 


VARIABLES PRINCIPALES 

u,q: Coordenadas de la bota. 
a,d: Coordenadas de la 
cucaracha, 
li: Vidas. 

e(x): Variable para la 
localización de la cucaracha, 
man: Frutas comidas, 
pan: n° de fase. 

¡,k: Coordenadas minas. 
i,s: Coordenadas bombillas. 




13» n2$=q4$ 

148 RESTORE 

145 u=l:q=l 

150 FOR n=l TO 15 

160 IF INKEY(69)=0 THEN GOSUB 290 

170 IF INKEY(?1)=0 THEN GOSUB 340 

180 IF 1NKEY<39)=0 THEN GOSUB 390 

190 IF INKEY(31)=0 THEN GOSUB 440 

200 LOCATE u.qrPRIMT* '¡LOCATE u,q 

♦1¡PR1NT* *:1F u=a AND d=q THEN SOU 

ND 3,800,30,15:G0SUB 610 

210 READ u,q 

220 SOUND 1,400,0.7,15 

230 LOCATE u,q:PRINT ql»:L0CATE u, 

q+1¡PRINT ql6* 

240 IF u=a AND d=q THEN SOUND 3,800, 
30,15¡GOSUB 610 
250 NEXT n 

260 nki=nki+1;IF nki/2=nki\2 THB1 RE 
STORE 

270 GOTO 150 

280 '*****ARR1BA***** 

290 LOCATE a,dsPRINT' '¡LOCATE a,d+ 
1¡PRINT* ' 

300 nRi-12¡d=d-2 
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318 GOSUB ¿98 
328 RETURN 

338 '*****ABAJO««* 

348 LOCATE a.díPRlNT- MOCATE a,d+ 

1¡PRINT 1 1 

358 nRi+12:d=d+2 

3á0 GOSUO ¿99 

378 RETURN 


518 SYMBOL 245,8,128,148,148,112,16, 
38,14:SYMBOL 246,14,88,16,112,148,14 
8,128¡SYMBOL 247,8,1,49,49,14,8,18,1 
12¡SYMBOL 248,112,18,8,14,49,49,1 
528 SYMBOL 249,8,8,252,252,252,252,2 
52,252:SYMBOL 258,252,254,254,254,25 
4,254,252:SYMBOL 251,1,26,59,127,127 
,127,63 


8¡SYMBOL 219,128,128,67,32,24,7¡SYMB 
OL 228,8,8,128,64,32,38,199,63:SYMBO 
L 221,63,19?,39,32,ÓA,128:SYMBOL 222 
,252,252,252,252,252,252,252,252 
588 SYMBOL 223,8,12,18,33,225,225,18 
,12:SYMBOL 224,8,8,198,188,111,127 
598 RETURN 

688 '**********PIERDE VIDA********** 



388 '«««IZQUIERDA***** 

398 LOCATE a,d:PRINT’ ‘¡LOCATE a,d* 
1 :PRINT‘ ‘:ml$=q5$¡íi2$=q6* 

488 ti=n-l :a=a-2 
418 GOSUB 698 
428 RETURN 

438 '**««OERECItt««« 

448 LOCATE a,d:PRINT‘ ‘¡LOCATE a,d+ 
1 SPRINT’ ’ :mlf=q3$:ri2$=q4* 

458 nH»+l:a=a+2 
468 GOSUB 698 
478 RETURN 

488 '«««««caracteres*********** 

* 

498 SYMBOL AFTER 288 
588 SYMBOL 241 ,8,36,18,9,15,31,68,12 
7:SYM80L 242,8,128,64,64,198,239,61, 
255:SYMBOL 243,255,61,239,198,64,64, 
128¡SYMBOL 244,127,68,31,15,9,18,36 


538 SYMBOL 281,0,8,0,8,1,7,15,31 ¡SYM 
BOL 282,8,48,96,192,128,224,248,248: 
SYMBOL 283,63,63,63,63,3!,15,7 ¡SYMBO 
L 284,252,252,252,252,248,248,224 
548 SYMBOL 285,8,8,34,17,153,285,68, 
255; SYMBOL 286,255,68,285,153,17,34: 
SYMBOL 289,8,8,8,8,134,231,89,255 :SY 
KBOL 288,255,89,231,134 
558 SYMBOL 218,8,1,2,2,99,247,188,25 
5 ¡SYMBOL 211,255,188,247,99,2,2,1 ¡SY 
MBOL 212,8,36,72,144,248,248,68,254: 
SYMBOL 213,254,68,248,248,144,72,36 
568 SYMBOL 214,8,8,9,8,8,8,31,63: SYM 
BOL 215,8,8,8,8,8,8,28,198 ¡SYMBOL 21 
ó,127,255,255,255,182,66,132,198: SYM 
BOL 217,243,255,254,248,48,32,64,96 
578 SYMBOL 218,8,8,7,24,32,67,128,12 


618 1i=li-1:PO=PO+3 
628 BORDER 8,15 

638 LOCATE 3,8+P0:PRINT q7$¡LOCATE 3 
,9+PO¡PRINT q8$ 

648 FOP i—1 TO 2888 ¡NEXT i : BORDE 
R 8 

658 IF 1i=0 THEN GOSUB 840 

668 LOCATE u,q¡PRINT 1 ‘¡LOCATE u,q 

+1¡PRINT 1 ‘ 

678 a=ll :d=9:n*=14:u=l :q=l ¡LOCATE a,d 
¡PRINT q3$¡LOCATE a,d+l¡PRINT q4*:G0 
T 0 128 

688 '**********C0MPRUEBA CHOQUE***** 
***** 









690 1F nan)=3 AND m=96 7HEN 1F rian>3 
THEN uno=uno*l:GOSUB 828 ELSE GOSUB 
828 

700 1F e<n)=0 THEN SQUND 3,2580,38,1 

5,18,9,15:G0SUB 610 

718 !F e(i»)=2 THEN SOUND 1,48,4,15:7 

A=TA+108:LOCATE 34,9:PR1NT TA:raan=ma 

n+1 :e(is)=l :1F t»an=3 THEN LOCATE 31,2 

1:PR1NT* 1 ¡LOCATE 31,22:PR1NT , "¡I 

F ro=4 THEN GOSUB 1950 

720 SOUND 1,288,4,15 

738 LOCATE a,d:PR1NT r»l$:LOCATE a,d+ 

1 :PRINT i*2$ 

748 RETURN 

758 ' **********NUES7RA VIDAS******* 
*< 

768 LOCATE 2,BiPRINT'VIDAS":1=8 
778 FOR N=1 TO 3 

780 1=1+3¡LOCATE 3,1:PRINT q3$:L0CAT 
E 3,1+1:SPRINT q4$ 

798 NEXT 
888 RETURN 

810 "" *******cantb i o de pantalla****** 
*** 

820 FOR k=1500 TO 388 STEP -8:SOUND 
l,k,0.5,15:NEXT 

838 ON ¡da GOTO 1260,1318,1368,1428, 
1478,1528,1570,1630,1750,2180 
840 '*********4¡nal *********** 

858 MODE 1:BORDER 14 
860 CLEAR:GOSUB 968:L0CATE 19,28:PRI 
NT q131¡LOCATE 19,21¡PR1NT q!4$:L0CA 
TE 1,12:PR1NT" Ohhhhhh!!!!!!!! L 
O SIENTO!!!!!!!!“ 

870 PEN 3:FOR x=l TO 20¡LOCATE 19,x: 
PR1NT q17$¡LOCATE 19,x+l¡PRINT ql6$: 
SOUND 1,ABS(x-20)*20,3,15¡FOR r=l TO 
10 ¡NEXT r¡NEXT x 
880 FOR n=l TO 1000¡NEXT 
390 LOCATE 6,23:PRINT"PULSA S PARA J 
UGAR OTRA VEZ* 

980 A$=INKEY$:IF A$="S" OR A$="s" TH 
EN RUN ELSE GOTO 988 
910 '**********dibuja pantalla****** 
***** 

920 PEN 1¡FOR n=9 TO 32¡L0CATE n,7:P 
RINT CHR$<287)¡LOCATE n,8:PRINT CHR$ 
(287)¡LOCATE n,23:PRlNT CHR$(287)¡L0 
CATE n,24¡PRINT CHR$<287)¡NEXT 
930 FOR n=9 TO 22¡L0CATE 9,n:PRINT 
q18$¡LOCATE 31,n:PRINT ql8$:NEXT 
940 RETURN 

958 '*******variables de caracteres* 
******* 

968 ql$=CHR$(218)+CHR$(228):q2$=CHR$ 
(219)+CHR$(221):q3$=CHR$(241)+CHR$(2 
42):q 4$=CHR$(244)* CHR$(243);q5$=CHR$ 
<210)+CHR$<212):q6$=CHR$(211)+CHR$(2 
13):q7$=CHR$< 205)+CHR$(209):q8$=CHR$ 


(28é)+CHR$< 208):q9$=CHR$<201)+CHR$<2 
82):ql0$=CHR$(283)+CHR$<204) 

978 qlI$=CHR$(247)+CHR$(245):ql2$=CH 
R$(248)+CHR$(246):ql3$=CHR$(214)+CHR 
$(215):ql4$=CHR$(216)+CHR$(217):ql5$ 
=■ , *CHR$<249):ql6$=CHR$(251)+CHR$(2 
50):ql7$=* , +CHR$(222):ql8$=CHR$<207 
)*CHR$< 287) 

988 RETURN 

990 '********subrutina de pantalla** 
******** 

1888 FOR i=l TO 110 :e(i)=l¡NEXT 
1010 FOR ¡=! TO 188 STEP !2:e(i)=0:e 
(i-1)=0¡NEXT 

1020 FOR i=l TO 12:e(i)=0:e<i*96)=8: 
NEXT 

1038 PEN 1¡LOCATE 31,21¡PRINT ql8$:L 
OCATE 31,22:PRINT ql8$ 

1848 FOR j=1 TO 14 ¡LOCATE 11 ,8+J:PRI 
NT’ 1 ¡NEXT a 



s:PRINT ql$:LOCATE í,s+l¡PRINT q2$ 
1190 RETURN 

1200 '******»*»***pr¡mera pantalla** 
******** 

1210 PAN=1:ida=l:dal=30:du=15 
1228 GOSUB 1888 

1238 e(18)=0¡e(27)=0:e(33)=0:e(48)=0 
:e<41)=8:e<45)=0:e(52)=0:e(53)=8:e<5 
9)=0¡e(64)=0:e(67)=0:e(70)=0:e(88)=0 
:e(91)=0:e(79)=0¡e(23)=2:e<43)=2:e(8 
6)=2 
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1850 RESTOREiFOR n=l TO dal¡READ o,p 
¡NEXT 

1068 FOR e=l TO du:READ h,p 

1078 LOCATE h,p:PRINT qll$¡LOCATE h, 

p+1¡PRINT ql2$ 

1888 NEXT e 
1898 PEN 3 
1188 FOR n=l TO 3 

1118 READ j,k¡LOCATE j,k:PRlNT q9$:L 
OCATE j,k+l¡PRINT ql0$ 

1120 NEXT 

1138 LOCATE 11,3¡PRINT 1 FASE NUMERO:" 
¡pan 

1148 LOCATE ?,5:PRINT"MIS10N:SALIR C 
ON WS LLAVES "q$ 

1158 PEN 2¡LOCATE a,d¡PRINT q3$:L0CA 
TE a,d+l¡PRINT q4$ 

1168 LOCATE 34,7¡PRINT'TANTEO" 

1178 nan=0¡q=l:u=l 

1180 1F ro=4 THEN READ i,s:LOCATE i, 


1248 RETURN 

1250 '**************segunda pantalla 
************ 

1260 a=ll:d=9:n»=l4:raan=8:ida=2:pan=2 

:dal=47:du=17 

1270 GOSUB 1800 

1288 e(15)=0:e(20)=8:e(27)=8:e(35)=0 

:e(48)=8:e(41)=0:e(45)=0:e(52)=0:e(5 

3)=8 :e(68)=0:e(71)=0:e(78)=8:e(86)=8 

:e(87)=8:e(94)=8:e(l?)=0:e(23)=2:e(2 

8)=2:e(94)=2 

1298 GOTO 120 

1388 '***********tercera pantalla*** 
*********** 

1310 pan=3:ida=3:dal=68:du=21 :a=ll:d 

=9:is=14:raan=8 

1320 GOSUB 1880 

1330 e(15)=0:e(18)=0:e(23)=0:e(27)=8 
:e(28)=0:e(33)=8:e(39)=0¡e<41)=8:e(4 
5)=0:e(53)=8:e(70)=8:e(71)=0:e(74)=0 
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:e<75H:e<78)=8:e<81)=8:e<8¿)=B:e<8 
7)=8:e(89)=0¡f<90)=0:e(91)=0;e<40)=2 
:e<17)=2:e<83)=2 
1348 GOTO 128 

1358 '***********cuarta pantalla**** 
******* 

1368 pan=4:ida=4:dal=?l:du=26:a=ll:d 
=9:nFl4:man=8:ro=4:xl=15:yl=21:x2=88 


1378 GOSUB 1888 

1380 e(18)=8: e <28)=8:e(22)=8:e(23)=8 
¡e(27)=8;e(28)=0:e(35)=0:e<45)=8:e<5 
8)=8:e(52)=8:e(57)=8:e(59)=8:e(42 >=8 
:e(67)=8:e(78)=0:e(71)=0:e(74)=8:í(? 

5) =8 

1398 e(78)=8:e<81)=8:e(86)=0:e<87)=2 
:e(9B)=0:e<91)=8:e< 88)=8:e<19)=8:e<4 

6) =2:e(83)=2:e<89)=2 
1488 GOTO 120 

1418 '**********quinta pantalla***** 

H1HH 

1420 pan=5:ida=5:da1=121:du=23:a=l1: 

*=9:nFl4:i»an=0:r(F8 

1438 GOSUB 1888 

1448 eU5)=8:e(18)=0:e(22)=8;eí23)=0 
:e<27)=0:e< 41)=0:e(43)=0:e<45)=8:e<5 
0)=0:e(59)=8:e(42)=0:e(64)=8:e(64)=0 
:e(48)=8:e(70)=0:e(71)=0:e<75)=0:e(7 
8)=8:e(79)=8:e(83)=8:e(89)=8:e(90)=0 
:e<91)=0:e<17)=2:e<74)=2:e<92)=2 
1458 GOTO 120 

1468 '*****<******sexta pantalla**** 
************* 

1470 pan=6:ida=6:dal=147:a=ll:d=9:ma 
n=0:rtF4:du=20:xl=ll:yl=19:x2=74:i»=l 
4 

1480 GOSUB 1088 

1498 e(18)=8:e(22)=8:e(27)=0:e(28)=0 

:e(33)=0:e(39)=0:e(41)=0:e(46)=0:í(5 

8)=8:e(66)=8:e(67)=0:e(78)=8:e<71)=8 

:e(74)=0:e(75)=8:e(77)=0:e(87)=8:e(8 

8)=0:e(91)=8:e<92)=0:e(23)=2:e(42)=2 

:e(89)=2:e<86)=2 

1588 GOTO 128 

1518 '**********septinia pantalla**** 
******* 

1520 pan=7:ida=7:dal=171 :a=ll:tf=9:nia 
n=0:ro=0:du=22:n=14 
1538 GOSUB 1000 

1540 e(19)=0:e<23)=0:e<27)=0:e(28)=0 

:e(33)=0:e<39)=8:e(41)=0:e(43)=8:e(4 

5)=0 :e(4ó)=8:e<53)=8:e(57)=0:e<44)=8 

:e(47)=8:e(68)=8:e(?0)=B:e<71)=8¡e(7 

4)=0:e(75)=0:e(79)=8:e(94)=0:e<40)=2 

:e(59)=2:ek84)=2 

1558 GOTO 128 

1568 '***********octava pantalla**** 
**** 

1578 pan=8:ida=8:dal=196:a=ll:#=9:iia 


n=8:ro=4:du=24 :nFl4:xl=ll:yl=17:x2=6 
2 

1588 GOSUB 1880 

1598 e(15)=0:e(18)=8:e(22)=8:e(27)=0 
:e<28)=0:e<33>=0:e<39)=0:e<41)=0:e(4 

2) =8:e(43)=0:e(46)=0:e(53)=0:e(57)=8 
:e<42)=8:e<66)=0:e(67)=8:e(71)=0:e(7 
5)=8:e(79)=8:e(8á)=0 

1608 e(87)=8:e<88)=0:e(89)=0:e(94)=8 
:e(17)=2:e(48)=2:e(23)=2:e<74)=2 
1618 GOTO 128 

1628 '************novena pantalla*** 
****** 

1438 pan=9:ida=9:dal=224:a=l!:{fc9n»a 

n=8:ro=8:du=25:nFl4 

1640 FOR j=l TO 14¡LOCATE 11,8+J:PR1 

NT 1 1 ¡NEXT J 

1658 LOCATE 15,12:PRINT*FASE OSCURA 1 

1668 LOCATE M.HiPRlNT 1 BOMBILLAS: 

"¡UNO 

1670 1F uno=3 THEN LOCATE 17,17:PR1N 

T’HAY LUZ 1 ¡GOTO 1690 

1688 LOCATE 16,17:PR1NT-N0 HAY LUZ": 

qll$=‘ 1 :ql2$=" 1 

1698 FOR j=1 TO 2588 ¡NEXT 

1708 GOSUB 1080 

1710 e<18)=0:e(19)=8;e(22)=0:e(27)=8 
:e(28)=0:e(33)=0:t(48)=8:e(42)=8¡í(4 

3) =0:e(44)=0:e(46)=0:e(42)=8¡e<46)=0 
:e(67)=0:e(71)=0:e(74)=8:e(75)=0¡e(7 
8)=8:e(79)=0:e<86)=8:e(87)=0:e(88)=0 
:e(89)=8 

1728 e<90)=0:e<91)=0:e(94)=8:e(20)=2 

:e<23)=2:e<89)=2 

1730 GOTO 128 

1740 J **********decima pantalla***** 
*** 

1750 GOSUB 968 

1760 pan=18: i da=18:dal=252:a=l1¡d=9: 
nan=0:ro=0:du=28:i»=14¡q?$= 1 1 :ql8í= 
CHR*<224)*CHR*<223) 

1778 GOSUB 1000 

1788 e(15)=0¡e<17)=0:e(19)=0:e<20)=8 

:e<27)=0:e<33)=0:e<35)=0:e<3?)=8 :e<4 

1)=8:e(42)=8¡e(44)=8:e(45)=8:e(53)=8 

:e< 57)=0:e<59)=0:e(62)=8:e< 64)=8:e < 6 

7)=0:e<71)=8:e(75)=0 

1798 e < 77>=0:e(79)=0¡e(81)=8:e(86)=0 

:e(91)=8:e(92)=0:e(94)=0:e<83)=2:e(2 

3)=2:eí87)=2 

1880 GOTO 120 

1810 '***********datas************* 

1820 DATA 29,21,27,19,25,21,23,19,25 

,17,23,15,21,15,19,15,17,17,15,19,13 

,17,13,15,11,13,11,11,11,9 

1830 DATA 29,21,29,21,27,19,25,21,23 

,19,25,17,27,15,29,13,27,11,25,9,23, 

11,21,11,19,11,17,11,15,9 


1848 OATA 19,9,13,11,25,11,15,13,17, 

13.25.13.15.15.17.15.29.15.15.17.21, 
¡7,27,17,21,19,15,21,21,21,29,9,21,1 

3.11.21 

¡850 DATA 13,9,17,9,23,9,13,11,29,11 
,15,13,17,13,25,13,15,15,17,15,23,17 
,29,17,19,19,11,21,13,21,23,21,27,21 
,29,9,15,11,15,21 

1868 DATA 13,9,19,9,29,9,13,11,15,11 
,25,11,13,13,17,13,25,13,17,15,27,17 
,29,17,11,19,13,19,19,19,25,19,11,21 
,13,21,17,21,19,21,21,21,17,9,15,13, 
29,19 

1870 DATA 19,9,21,9,23,9,27,9,29,9,1 
3,11,15,11,29,11,25,13,11,15,15,15,2 

5.15.29.15.11.17.21.17.27.17.29.17.1 

1.19.13.19.19.19.25.19.11.21.15.21.1 

9.21.21.21.17.21.27.13.29.19.13.21 
1888 DATA 13,9,19,9,27,9,29,9,13,11, 
17,13,21,13,25,13,11,15,29,15,11,17, 
15,17,19,17,23,17,27,17,29,17,13,19, 

19.19.21.19.29.19.17.21.19.21.21.21, 

11.19.17.9.23.21 

1898 DATA 19,9,27,9,13,11,15,11,25,1 

1.13.13.17.13.27.13.11.15.19.17.21.1 

7.27.17.29.17.11.19.13.19.17.19.13.2 

1.15.21.21.21.23.21.29.9.11.17.17.21 

, 11,21 
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1980 DATA 21,9,29,9,13,11,15,11,25,1 

1.13.13.17.13.21.13.25.13.27.13.17.1 

5.25.15.15.17.21.17.23.17.27.17.29.1 

7.11.19.13.19.21.19.17.21.27.21.15.1 
3,29,15,11,21 

1918 DATA 13,9,19,9,27,9,13,11,15,11 

,25,11,13,13,17,13,19,13,21,13,27,13 

,17,15,25,15,11,17,19,17,21,17,29,17 

,13,19,21,19,11,21,13,21,15,21,17,21 

,27,21,17,9,29,9,15,13,11,19 

1928 DATA 19,9,21,9,27,9,13,11,15,11 

,25,11,15,13,19,13,21,13,23,13,27,13 

,11,17,19,17,21,17,29,17,11,19,13,19 

,19,19,21,19,11,21,13,21,15,21,19,21 

,21,21,27,21,23,9,29,9,17,21 

1938 DATA 13,9,17,9,19,9,21,9,23,9,1 

3.11.25.11.29.11.13.13.17.13.19.13.2 

3.13.25.13.17.15.25.15.29.15.11.17.1 

5.17.21.17.29.17.13.19.17.19.21.19.2 
5,19,11,21,21,21,23,21,27,21,29,9,13 
,21,29,19,11,19 

1948 '*«*****abre puertas de bonbil 
las****** 

1950 LOCATE xl,yl¡PRINT' ’¡LOCATE x 
1,yl*1¡PRINT’ 1 :e(x2)=l 
1940 RETURN 

1978 ' ******* instrucciones******* 
1988 PEN 2¡LOCATE 13,3¡PRINT’1NSTRUC 


CIONES'¡PEN 3 

1990 PRINT:PRINT' Este es un diver 
tido juego en el cualtu misión consi 
ste en atravesar el labe-rinto de la 
s 10 tases.' 

2088 PR1NT¡PRINT' Ten cuidado ya q 
ue las paredes están electrizadas,en 
cotraras minas explosivasno las toqu 
es,también hay una molesta bota la 
cual intentara pisarte.' 

2010 PRINT¡PRINT' Para pasar de un 
a tase a otra debes comerte todas 1 
as trutas que encuentres en la tase 
donde estes.' 

2820 PRINT¡PRINT'Las teclas para mov 
er tu escarabajo: AiArriba 

ZiAbajo <¡Izquer 

da >:Derecha‘ 

2038 PRINT ¡PRINT' PULSA LA TECLA 
S PARA JUGAR' 

2048 60SUB 2870 
2850 GOTO 2848 

2060 '*»*****nusica********* 

2870 SOUND 1,478,188,4 

2880 SOUND 2,379,50,0:SOUND 2,379,50 

2890 SOUND 4,319,75,0¡SOUND 4,319,25 


2188 SOUND 1,504,108,7 

2118 SOUND 2,426,25,0:SOUND 2,426,75 

,í 

2128 SOUND 4,319,50,0¡SOUND 4,319,50 

,< 

2138 SOUND 1,548,388,6 
2148 SOUND 4,284,100,0:SOUND 4,284,2 
5,6:S0UND 4,239,50,6:SOUND 4,198,125 
,6 

2150 FOR IfI TO 808:A$=1NKEY*:IF A*= 
V OR A$='S* THEN GOTO 188 ELSE NEX 
T b 

2140 RETURN 

2178 '*********terninar********* 

2180 CLS:CLEAR:GOSUB 960:PEN 1¡FOR n 
=1 TO 48 STEP 2¡LOCATE n,2:PRINT qll 
$:LOCATE n,3:PRINT ql2*:L0CATE n,22: 
PRINT ql1^¡LOCATE n,23:PRINT ql2$:NE 
XT 

2190 FOR n=l TO 22 STEP 2:L0CATE l,n 
+1¡PRINT ql1S¡LOCATE 1,n+2:PRINT ql2 
4¡LOCATE 39,n+1¡PRINT qll*¡LOCATE 39 
,n+2¡PRINT ql2í:NEXT 
2288 PEN 3¡LOCATE 3,13:PRINT' ENHORA 
BUENA!!!! LO CONSEGUISTE!!!' 

2218 FOR ¡=1 TO 4 
2220 GOSUB 2870 

2230 PEN 2:FOR n=10 TO 30 STEP 2:L0C 
ATE n,10¡PRINT q3$¡L0CATE n,11¡PRINT 
q4$¡LOCATE n,15:PR!NT q3$¡LOCATE n, 
16¡PRINT q4$:F0R rt=l TO 38:NEXT rt: 
LOCATE n,10¡PRINT' '¡LOCATE n,ll:PR 
INT’ '¡LOCATE n,15:PRINT' '¡LOCATE 
n,16:PRINT' '¡NEXT n 
2240 NEXT i 

2250 PEN 1¡LOCATE 13,18:PRINT'PULSA 
LA TECLA A*¡LOCATE 11,20:PRINT'PARA 
JUGAR OTRA VEZ* 

2240 1F INKEY(69)=0 THEN RUN ELSE GO 
TO 2240 
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Le imm DE Lie MEJORES 

Para que lo tengas fácil. Aquí tienes una selección de los mejores juegos que puedes encontrar. 
Cualquiera de ellos tiene la garantía de calidad y adicción que esperas encontrar en un videojuego. 
Para no llevarte “sorpresas”... elige un juego distribuido por ERBE en cualquiera de las 

buenas tiendas de informática. 



AVENGER (Way of The Tiger II) 


TOP-GUN (Idolos del Aire) 


GREAT ESCAPE 
(Gran Escapada) 


Primero fue Way of The Tiger en donde 
tuviste que demostrar tus habilidades para 
convertirte en Ninja. Ahora es “Avenger”, 
en donde tendrás que demostrar que, 
además de fuerte, eres hábil e inteligente 
para conseguir vencer al Gran Guardián. 
Buena suerte... sólo los bravos sobrevivirán. 


Top Gun te coloca en la cabina de un 
TOMCAT F-14. Gráficos vectoriales y la 
pantalla dividida permiten a 1 ó 2 jugado¬ 
res luchar entre ellos o contra el ordena¬ 
dor. Tus armas en este combate, no apto 
para cardíacos, son misiles guiados por el 
calor, y una ametralladora de 20 mm. 


Alemania 1942. La guerra ha estallado y 
tú has sido capturado y condenado en un 
campo de concentración. Tu deber es es¬ 
capar, pero no te resultará fácil. Necesita¬ 
rás planear cuidadosamente las acciones 
utilizando toda tu astucia para escapar 
con vida del campamento. 
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STALLONE 

COBRA 


COBRA 


Por primera vez un juego supera al film. 
Cobra (el juego) te sorprenderá por su ac¬ 
ción y sus gráficos, superiores, incluso, a 
los del “Green Beret”. El crimen es una 
enfermedad...; tú, el remedio. 
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suburbios de la ciudad, donde 
sabía cjue encontraría al cínico 
Arlequín esperándole para tomar 
la revancha de la derrota que le 
había inflingido. 

Pero también sabía que no le 
esperaría en campo abierto. Sin 
duda, el Arlequín se escondería 
en su cueva repleta de mortíferos 
ingenios y trampas para jugar con 
todas las cartas a su favor. 

Cuando llegó a la oscura 
entrada, no vaciló al entrar, 
puesto que confiaba plenamente 
en sus sentidos murciélagos, y 
aunque éstos eran formidables, no 
pudo darse cuenta de lo rápido 
que el suelo se abría bajo sus 
pies. 

Consiguió aterrizar bien, gracias 
a su agilidad, mientras pensaba 
que era ya el momento de la 
acción. 

Y si en ese instante BATMAN 
empezaba su aventura, nosotros 
en éste empezamos a relatar uno 
de los juegos que podemos tildar 
de excelente. 

Las peripecias de este hombre- 
murciélago se desarrollan en un 
tipo de escenario gráfico que en 
su tiempo, y aun hoy en día, 
causó furor; estamos hablando de 
la técnica de «filmation», que 
inició sus pasos con el conocido 
KNIGHT LORE. 

Algunos de los juegos que 
siguieron después se conformaron 
con copiar esta magnífica técnica, 
otros han intentado mejorarlos. 
BATMAN se encuentra entre estos 
últimos. 

Lo primero que tenemos que 
destacar de este juego, bueno, 
más bien de sus creadores, es el 
alarde imaginativo del que han 
hecho gala. Si bien, el tema es el 
del típico arcade, las secuencias 



BATMAN 

AMSTRAD PCW 

Desde la azotea del rascacielos, la estática figura observa el 
tranquilo transcurrir de la noche. Pero aunque intenta 
disfrutar de ello, un torbellino de ideas bombardea su mente. 
Antes pensaba que su misión sería más simple, sin embargo, 
ahora que conocía las tretas de su enemigo, sabía que 
tendría que pelear fuerte y utilizar todos sus superpoderes 
para recuperar su máquina más impresionante, el Batí móvil. 

Sí, Batman lucharía hasta el fin para recuperar esta 
maravilla de las manos del odioso Arlequín. 



gráficas en que éste se desarrolla 
son de una originalidad y simpatía 
importante. 

Todo esto se ha podido 
elaborar, y muy bien por cierto, 
debido a la personalidad del 
enemigo de BATMAN; el malévolo 

Arlequín. 

En su cueva podremos ver los 
seres más estrambóticos; extraños 
perros, cabezas andantes, diablos 
que parecen de Tasmania, etc. 

También son bonitas y originales 
las salas por donde veremos 
discurrir todos estos entes, ya que 
la cueva del Arlequín es una 
singular mezcla entre parque de 
atracciones y tétrico castillo 
medieval. 

BATMAN tiene que ir con los 
ojos muy abiertos para evitar los 
peligros que se ven, pero no 
puede olvidar que su oponente es 
amigo de utilizar escalones que 
desaparezcan al pisarlos, trampas 
en los pasadizos, gases letales, y 
mucho más... 

De la parte positiva, que no 
debemos olvidar, tenemos que 


nuestro héroe podrá utilizar 
cuatro de sus especialísimos 
aparatos, si consigue recogerlos 
también de las salas donde 
Arlequín los ha dejado, claro está. 

Las poderosas botas le 
permitirán dar saltos de gran 
magnitud; con la cesta podrá 
recoger determinados objetos 
imprescindibles para su misión; 
con su propulsor iónico aumentará 
la velocidad de salto y podrá 
planear; así como su cinturón 
antigravedad hará más lentas las 
caídas. 

Cuando consigamos que nuestro 
superhéroe reúna este portentoso 
equipo, sus dificultades se 
reducirán notablemente, aunque 
todavía le quedará una ardua 
tarea debido a que el 
maquiavélico Arlequín ha dividido 
en siete partes de su coche, 
escondiendo cada una de ellas en 
una habitación de su inmensa 
cueva. 

Así que BATMAN comenzó a 
caminar por las extrañas 
habitaciones, preguntándose 
cuánto tardaría en encontrar el 
primero de estos útiles aparatos. 
Afortunadamente, al cabo de 
poco rato vio en una sala la 
cesta, custodiada por un ente 
diabólico, lo esquivó hábilmente y 
cogió su bolsa. Un par de 
habitaciones después consiguió 
encontrar el lugar donde estaban 
las botas; entró y, después de 
hacer una demostración de 
equilibrio para no caer al vacío, 
cogió las mismas. 

Aumentando su velocidad, pero 
sin dejar de memorizar el 
recorrido, BATMAN siguió 
recorriendo el galimatías que era 
la cueva de Arlequín. 

Y así fue recorriendo otra 
porción de la cueva hasta que 
ilegó a la habitación donde 
estaba el propulsor y se lo colocó 
con una sonrisa. Ya sólo le 
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quedaba encontrar uno de los 
portentosos aparatos de su 
equipo. 

Atravesó un extraño puente que 
se deshacía al pisarlo. Siguió 
reconociendo habitaciones, y al 
abrir la puerta de una de ellas vio 
lo que tanto había buscado: el 
cinturón. 

Pero por la prisa que empleó 
para ir a recogerlo, no se percató 
de que, una vez más, el suelo 
desaparecía bajo sus pies. Pero en 
esta ocasión el propulsor 
consiguió que pudiera aterrizar sin 
consecuencias. 

En el suelo de la habitación se 
elevaba una plataforma que 
parecía llevar a pisos superiores, 
BATMAN saltó a ella, y mientras 
subía, descubrió otra plataforma 
donde estaba la última, y por lo 
tanto anhelada, pieza de su 
equipo. BATMAN sabía que con 
éste completo su misión ya casi 
estaba realizada. 

Otro factor que hará más fácil 
o difícil nuestra tarea serán las 
figuritas, con forma de BATMAN, 
que Arlequín ha colocado en 
algunas estancias y corredores. 

Unas consiguen que nos 
movamos con más rapidez; otras, 
que podamos hacer 10 super 
saltos; las terceras, que nuestros 
enemigos se vuelvan inofensivos; 
así como las cuartas y quintas dan 
y quitan una vida 
respectivamente. 

Después de tomarse un respiro, 
BATMAN empezó a realizar la 
búsqueda del objeto que 
realmente le había llevado allí, el 
fantástico Batimóvil. 

La primera pieza del mismo, 
una aleta, se hallaba en una de 
las habitaciones inferiores. Para 
cogerla desdeñó una falsa 
escalera de cubos, que era una 
trampa, y colocó una pieza que 
encontró bajo el cubo que había 
¡unto a la aleta y saltó. El cubo se 
deshizo y la aleta cayó al suelo, 
la cogió y siguió su camino. 

La segunda la encontró tras una 


Con la certeza de poder 
conseguir recuperar su Batimóvil, 
BATMAN prosiguió la búsqueda de 
la séptima pieza. 

Pero ésta se encontraba muy 
bien escondida y requirió que 
nuestro héroe tuviera que recorrer 
innumerables habitaciones. 
Empezaba el desánimo a hacer 
mella en él, cuando entró en una 
habitación con tres teteras y una 
serie de cubos formando puente 
sobre los que descansaba una 
esfera con una interrogación. 
BATMAN comprendió de repente y 
se puso a trabajar. 

Situó dos teteras ¡unto a la 
puerta formando tope. Trepó por 
el puente de cubos y empujó la 
bola que rodó hasta detenerse 
¡unto a las teteras. Con sumo 
cuidado separó éstas y se situó 
tras la bola. Tomó impulso y la 
lanzó a rodar bajo el puente de 
cubos. La bola chocó contra un 
objeto y lo arrastró al exterior. La 
última pieza del coche estaba en 
su poder. 

Como se puede ver, en este 
juego no falta emoción y 
actividad, ésta incluso la 
podríamos definir como febril. 

Si hablamos a nivel gráfico, no 
podemos olvidar que en esta 
ocasión el juego va dirigido 
a los PCW, y que en éstos 
el monitor es de fósforo 
verde, o sea, debemos 
olvidarnos del color, o 
por lo menos de todo 
lo que no sea verde. 

Si bien esto no 
podría importar en 
otro juego, no ocurre 
en éste, debido a que 
en los CPC se 
desarrolla en pantallas 
casi monocromas, así 
que no nos perdemos un 
gran colorido. 

El movimiento sí que es 
realmente bueno, rápido y 
divertido. 


Es realmente gracioso observar 
cómo se pone nuestro héroe en 
«jarras» y golpea el suelo 
nerviosamente con su pie, cuando 
le hemos hecho pararse durante 
un rato. Es como si dijera: «¿a 
qué esperas?». 

Si a este acertado movimiento le 
añadimos unos dibujos muy 
buenos y una trama, aunque ya 
clásica, llena de peripecias, 
formaremos un «cocktail» que 
logrará entretenernos. 


No muy lejos de la anterior 
encontró Iq sexta. Para llegar a la 
sala donde estaba había que 
recorrer un corredor plagado de 
obstáculos. Cualquier error 
conducía al abismo. BATMAN 
logró pasar sin percance alguno, 
gracias a su excepcional sentido 
del equilibrio, y recogió la pieza 
que se encontraba en lo que 
parecía ser la imitación de un 
castillo. 


intrincada ascensión en una 
solitaria habitación. Si hubiera 
caído, tendría que haber vuelto a 
subir, perdiendo con ello un 
tiempo precioso. 

Pero esto no ocurrió, y raudo 
fue a buscar la tercera pieza. Esta 
apareció en una excéntrica sala 
donde subían y bajaban dos 
émbolos. Como era muy accesible 
el lugar donde estaba, no le 
supuso mucho esfuerzo el cogerla. 

La quinta, otra aleta, se 
encontraba en una habitación, 
donde todo se había planeado 
como una trampa mortal. Nada 
más entrar en ella BATMAN oyó 
un fuerte zumbido. Levantó los 
ojos, y apenas tuvo tiempo de 
apartarse para esquivar la 
enorme piedra que le venía 
encima. Después de recuperarse 
de la impresión, se dispuso a 
abandonar la habitación, que 
parecía no contener nada, cuando 
un brillo azulado en un laberinto 
de zetas llamó su atención. 
Evitando tocar las paredes llegó 
hasta el lugar donde se veía el 
fulgor y descubrió que se trataba 
de la quinta pieza. 
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os elementos principales del 
joystick son: la base o carcasa, 
la empuñadura, el sistema de 
articulación y los elementos eléctricos. 
Cada uno de ellos juega un importan¬ 
te papel y solamente un buen resulta¬ 


do conjunto podrá ofrecer la garan¬ 
tía de transferir eficaz y rápidamente 
al ordenador vuestos movimientos. 

La empuñadura (stick), es el primer 
eslabón de la comunicación, las carac¬ 
terísticas particulares de este elemen¬ 
to son las que confieren al periférico 


una buena parte de su comodidad de 
uso, por ello, su diseño se realiza en 
base a conceptos anatómicos, si bien 
sólo son unos pocos los modelos del 
mercado que logran una buena adapta¬ 
bilidad a la mano del jugador y así per¬ 
mitir un uso prolongado consiguien- 


|i 



De ordinario la elección de periféricos para 
ordenadores suele realizarse tras la valoración 
personal de las características técnicas del 
producto; sin embargo, en los joysticks la mayoría 
de éstos son subjetivos y sólo la experiencia de 
uso nos puede conducir a una acertada 
valoración. Con este artículo intentamos ayudaros 
informándoos de los que hay en el mercado. 





















do con ello lo mínima fatiga muscular. 

La operatividad de la empuñadura 
es poder efectuar los desplazamientos 
correspondientes a las cuatro posicio¬ 
nes (N, S, E y O) que posteriormente 
analizará el ordenador y sus combina¬ 
ciones de movimientos diagonales 
(NO, NE, SO y SE). 

Una rótula esférica sirve de elemen¬ 
to de unión entre el stick y la carcasa, 
unión que debe permitir un suave des¬ 
plazamiento del stick, esta suavidad de 
desplazamiento y la ausencia de hol¬ 
guras en el mecanismo determinará la 
precisión del ¡oystick. El otro extremo 
de la empuñadura queda situado en¬ 
tre cuatro microruptores que son acti¬ 
vados o desactivados al alcanzar el 
stick la situación correspondiente. La 
construcción de estos contactos varia 
desde simples laminas flexibles hasta 
microruptores mecánicos (reconocibles 
por su «clic» característico) e incluso 
simples circuitos impresos superpues¬ 
tos que generalmente están integrados 
en una pieza de plástico que a veces 
lleqa a efectuar las funciones de la ró¬ 
tula. 

A fin de que la empuñadura retor¬ 
ne a su posición central (neutra), un 
sistema de resortes o masas elásticas 
(gomas) unidas a la parte inferior de 
la rótula realizan tal operación. 

La robustez de todo este conjunto 
mecánico es un factor determinante 



para aquellos que día a día se enfren¬ 
tan a duras batallas. 

MECANISMOS 
DE DISPARO 

Para la ejecución de disparos (o sal¬ 
tos) hay gran variedad de versiones, 
para ello se dota al ¡oystick de varias 
posibilidades, tantas como hábitos 
puedan tener los jugadores. 

Generalmente éstos se producen al 
pulsar algún botón de diferentes for¬ 
mas y tamaños que se encuentran dis¬ 
tribuidos en la empuñadura y/o la ba¬ 
se. 

Lo más habitual es que en la empu¬ 
ñadura haya al menos un pulsador al 
alcance del dedo pulgar y a veces se 
complemente con otro a modo de ga¬ 
tillo, accionable con el indice. Tam¬ 
bién, la carcasa puede tener uno o va¬ 
rios pulsadores de efecto semejante a 
los del stick, todos estos pulsadores es¬ 
tán concentrados eléctricamente en 
paralelo pudiendo efectuarse el dispa¬ 
ro desde cualquiera de ellos. Algunos 
modelos están complementados con 
un interruptor de disparo permanen¬ 
te que sirve de gran ayuda en los jue¬ 
gos de trepidante acción (salvo en 
aquellos en los que la energía es en 
función inversa a los disparos). 

En este capítulo es destacable la im¬ 
portancia de la recuperación de todos 
y cada uno de los ruptores a fin de que 
ésta no ralentice la sucesión de dispa¬ 
ros en ráfaga. 

LA SUJECION 

La carcasa o base del ¡oystick cum¬ 
ple una doble misión, una, la de alber¬ 
gar en su interior todos los mecanis¬ 
mos descritos anteriormente, la otra, 
la de ofrecer una gran sujeción del 
conjunto a la superficie de la mesa en 
el caso de estar prevista para ello o 
la de acomodarse a la mano en aque¬ 
llos tipos de ¡oystick diseñados para es¬ 
te modo de utilización. 

En el primer caso la sujección del 
¡oystick viene realizándose a base de 
unas ventosas que, dispuestas en su 
parte inferior, los inmovilizan suficien¬ 
temente. La mayoría de los modelos 
analizados poseen cuatro ventosas 
con la única excepeción del Quick Shot 
V que utiliza cinco, por otra parte pa¬ 
recen haberse puesto de acuerdo to¬ 
dos los fabricantes en el tamaño de és¬ 


tas..., todas ellas son de 30 mm de diá¬ 
metro. Sin embargo, el grado de su¬ 
jeción no sólo está en función del nú¬ 
mero de ventosas sino que también tie¬ 
ne su importancia la base de susten¬ 
tación que éstas proporcionan y la lon¬ 
gitud del stick, puesto que a mayor 
longitud de éste mayor empuje habrá 
de soportar la base. 

CONEXION 

La descripción del ¡oystick queda 
completada con una pequeña alusión 
al cable de conexión en el que cabe 
destacar la importancia de una longi¬ 
tud que permita su manipulación a 
una distancia apropiada que casi to¬ 
dos poseen. 

Por otro lado, la calidad del cable 
de conexión aunque no es influyente 
en la manipulación del periférico sí 
puede ser indicativo de la calidad ge¬ 
neral. 

DESARROLLO 

En los últimos años la evolución de 
este periférico ha alcanzado cotas 
muy altas pero sigue siendo el diseño 
clásico el de mayor difusión, desarro¬ 
llándose multitud de nuevos modelos 
más ergonómicos, cómodos y durade¬ 
ros, incorporando a ellos ingeniosos 
complementos al efecto como bases 
más amplias (Quick Shot III y V, Co¬ 
bra), mini teclados para introducción 
de niveles de dificultad y número de 
jugadores (QSV), utilización de meca¬ 
nismos de alta calidad (baza que ga¬ 
na el Cobra), etc. 

En cuanto a los modelos más avan¬ 
zados éstos presentan innovaciones 
realmente ingeniosas y de conceptos 
absolutamente distintos de lo habitual, 
bien que su aplicación debe ser enjui¬ 
ciada según cada particular. 

Modelos como el Cheetach de man¬ 
do a distancia evitan el a veces engo¬ 
rroso cable de conexión, si bien pue¬ 
de «jugárosla» durante una partida si 
en un momento de exaltación lo des¬ 
viamos de la dirección del interface re¬ 
ceptor. Sistema muy similar utiliza el 
Quick Shot Vil, pero sin dejar a un la¬ 
do el cable conector. 

El Joycard, es un reducido teclado 
que incorpora un joystick y un par de 
pulsadores en simulación a las «maqui- 
nitas» de los bares. 

Quizás el modelo de más impacto 
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visual sea el último de la extensa saga 
de Quick Shot, la versión nueve, una 
enorme bola de 10 cm de diámetro 
movible en cualquier dirección, dota¬ 
da de una gran precisión y que incor¬ 
pora dos teclas de gran dimensión pa¬ 
ra disparo y complementado con un 
par de interruptores que permiten las 
opciones de fuego automático e inver¬ 
sión de sentido de desplazamiento, 
haciendo posible distintas situaciones 
del aparato. 


Commando 


Joystick 


EL PRECIO DEL PODER 


Realizar un análisis de precios co¬ 
rrespondientes a cada modelo de 
joystyck de una forma fehaciente no 
es tarea fácil dado que generalmente 
se encuentran formando parte de 
atractivas ofertas, cuando no se inclu¬ 
yen en la compra del ordenador, pe¬ 
ro orientativamente oscilan alrededor 
de las 2.000/3.000 ptas. los modelos 
más convencionales, alcanzando 
10.000 y 12.000 los modelos más pre¬ 
cisos y/o sotisficados. 


Commodore 


Joycard 


Investick 


Capitán Grant 


Cheetah 


Quick 
ShotIX 


Cobra 
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Quick Shot III 


Quick Shot 


Kempston 


Kempston 

3000 


Quick Shot II 


Quick Shot V 


Konix 


Superstick 


Proto 
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CARACTERISTICAS TECNICAS 


MODELO 


EMPUÑADURA 


BASE 

DIMENSIONES (cm) 


Tipo 

Disparo 

Altura 

Sujeción Disparo 

Totales 

Cable 

CAPITAN GRANTAnatom. 

1 pulsador 

12 

Manual 

1 pulsa. 

13x10x16 

125 

CHEETAH 

Anatom. 

1 pulsador 


Manual 


16x6.5x2.5 

Mando distancia 

COBRA 

Anatom. 

2 pulsad. 

16 

4 ventosas 


14x12.5x24 

135 



1 gatillo 






COMMANDO 

Anatom. 

1 pulsador 

3 



4.5x3x17 

170 

COMMODORE 

Lisa 

1 pulsador 

7,5 

Manual 

1 tecla 

10x7x11 

127 

GRAN CAP. II 

Anatom. 

1 pulsador 

12 

Manual 

2 pulsad. 

12x12x16.5 

125 



1 gatillo 



+ AUTO 



GUNSHOT 

Anatom. 

1 pulsador 

13,5 

4 ventosas 

1 pulsad. 

13x11x16 

125 

INVESTICK 

Anatom. 

1 pulsador 

13,5 

4 ventosas 

2 pulsad. 

13x10x18 

104 



1 gatillo 






JOYCARD 

de bola 


4,5 

sobremesa 

2 pulsad. 

18x10x6.5 

27 

JOYSTICK 

Anatom. 

1 pulsador 

13 

4 ventosas 

2 pulsad. 

13.5x10x17 

124 



1 gatillo 






KEMPSTON 

de bola 


7 

Manual 

2 pulsad. 

11 x5x9xll 

120 

KEMPSTON 3000Anatom. 

1 pulsador 

12 

Manual 

1 tecla 

13x7.5x16 

160 



1 gatillo 






KONIX 

de bola 

1 gatillo 

6 



13x8x10 

135 

PROTO 

Anatom. 

1 pulsador 

12 

4 ventosas 

1 pulsad. 

12x12x15.5 

126 



1 gatillo 






QUICK SHOT 1 

Anatom. 

1 pulsador 

12 

4 ventosas 

1 pulsad. 

11x9x16 

126 

QUICK SHOT II 

Anatom. 

1 pulsador 

13.5 

4 ventosas 

1 pulsad. 

13x9.5x17.5 

126 



1 gatillo 



+ AUTO 



QUICK SHOT III 

Anatom. 

1 pulsador 

12 

5 ventosas 

2 pulsad. 

19x10x17 

126 



1 gatillo 



TECLADO 



QUICK SHOT V 

Anatom. 

1 pulsador 

12 

4 ventosas 

1 tecla 

19x9.5x17 

126 



1 gatillo 






QUICK SHOT Vil 

Disco 

2 gatillos 




12x9x2.5 

126 

QUICK SHOT IX 

Esfera 


10 

4 ventosas 

2 teclas 

22x14.5x12 

121 


10 cm 




+ AUTO 



SUPERSTICK 

Cilindro 

1 pulsador 

10 

Manual 


9x9x13 

157 

TOSHIBA 

Anatom. 

1 pulsador 

11 

Manual 

1 tecla 

13x10x18 

104 

VALORACION 

MODELO 


GRADO DE 

SUAVIDAD 

SUAVIDAD 

ADAPTACION 

ROBUSTEZ 

COMODIDAD 



SUJECION 

DE M0VIM. 

DE DISP. 

A LA MANO 

MECANIS. 

USO PR0L0NG. 

CAPITAN GRANT 



* * * 

* * * 

* * * * 

* * * 

* * 

CHEETAH 



* * 

* * * 

* * * * 

***** 

* * * 

COBRA 


* * ♦ * * 

* * * * 

***** 

***** 

***** 

***** 

COMMANDO 



* * * 

* * * 

* * * * 

* * * * 

* * * 

COMMODORE 



* 

* * 

* 

* * * 

* 

GRAN CAP. II 


* * * 

* * * * 

* * * 

* * * * 

* * * 

* * * * 

GUN SHOT 


* * * 

* * * * 

* * * * 

* * * * 

* * * 

* * * * 

INVESTICK 


* * * 

* * * 

* * * 

* * 

* * 

* * 

JOYCARD 



* * * * 

* * * * 

* * * * 

* * * * 

* * * * 

JOYSTICK 


* * * 

***** 

* * * 

* * * 

* * * 

* * * 

KEMPSTON 



• * * * 

• * * * 

* * * * 

* * * * 

* * 

KEMPSTON 3000 



* * 

* * 

* * 

* * * 

* * 

KONIX 



***** 

* * * * 

***** 

* * * * 

* * * 

PROTO 


* * * 

* * * 

* * * 

* * * 

* * * * 

* * * * 

QUICK SHOT 1 


* * * 

* * * * 

* * * * 

* * * * 

* * * 

* * * * 

QUICK SHOT II 


* * * 

* * * * 

* * * * 

* * * * 

* * * 

* * * * 

QUICK SHOT III 


* * * * * 

* * * * 

* * * * 

* * * * 

* * * * 

***** 

QUICK SHOT V 


* * * * 

* * * * 

* * * * 

* * * * 

* * * * 

***** 

QUICK SHOT Vil 



* * * 

* * * * 

* * * * 

* * * * 

* * * * 

QUICK SHOT IX 


* * * * * 

* * * * 

***** 

***** 

***** 

***** 

SUPERSTICK 



* * * 

* * 

* * 

* * 


TOSHIBA 



***** 

***** 

***** 

* * * 

* * * 
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COMERCIAL DE PRODUCTOS INFORMATICOS Y ASESOR AMIENTO 


Presentamos la más com¬ 
pleta gama de software para 
ordenadores Amstrad, IBM y 
Compatibles PC. 

Creado por las más presti¬ 
giosas empresas de softwa¬ 
re de nuestro país. 


SOFTWARE PARA AMSTRAD MODELOS CPC, 464 , 664 , 6128, PCW 8256 Y 8512 


OMICRON & PROA SOFT 


ZELIG INFORMATICA 


DESSIN 

PROGRAMAS EDUCATIVOS CPC 


CONTABILIDAD + IVA. CPC 6128 


CONTABILIDAD PARA PYMES 

464 Y 6128 


La más completa y fácil manejo 


Integración ya incluida y posibilidad de 

— Aprendo a leer 


CONTROL DE STOCKS CPC 6128 


Hardisc 

— Formulación química 


Controla el stockaje y proveedores, in¬ 


FACTURACION, CONTROL DE 

Considerados como los mejores pro¬ 


cluye una práctica 


STOCKS 

gramas educativos del mercado 


AGENDA ELECTRONICA 


Integración ya incluida y posibilidad de 

FACTURACION CON ALMACEN 


FACTURACION, ALMACEN, 

DDECIIDlICCTnC 


Hardisc 

UrL 404 Y 0I¿0 

Sencilla y potente facturación 


rntoUrUtolUo 

PCW 8256 

Muy completa y de fácil manejo 




DIMONI 

FACTURACION, CONTROL 

1 VALLES INFORMATICA, S. A. 


DE STOCKS 

Más que facturación, es una PCW ges¬ 


CONTABILIDAD PARA HARDISC 

Con módulos de ampliación 

DIGES 1 

CONTABILIDAD GENERAL PCW 


tión comercial con libro 8512 oficial de 


8256 Y 8512 


registro de IVA 


Gestión comercial Integrada 

Completa y sencilla contabilidad para 


JUEGO DE OTHELLO PCW 


DIGES II 

pequeñas y medianas empresas. 

W|C A ICT PDP C10Q p C\kl QOCC 


8256/8512 

Divertido juego de oficina que contem¬ 
pla la inteligencia Artificial 


Gestión industrial integrada 

VIoHJlI, UrLf 0I¿0, rVW 0¿00 

Y 8512 

Impresionante BASE DE DATOS con 





mentalidad de 4. a generación 


C/7Gut/ // íi C/ / /uC 

’oi/cío cL¡JIIL'dlLflUI /tío Ul / 


división Online de GALERIAS 


y comercios especializados. 


Para consultas de CPi asesores: 

Por línea telefónica al (96) 287 39 21 de lOh a 14h y de 17h a 20h de lunes a viernes. 
Por correo a CPi asesores, Passeig de les Germanies, 15. 46700 Gandía (Valencia). 









































Contabilidad General, 
Vencimientos 

Feo. Javier Barceló T. 

Dentro de los programas de gestión, los programas de contabilidad son los 
que más abundan. Y el Amstrad PCW no va a ser una excepción. Por eso, 
para facilitar la elección entre los diversos programas, hoy, AMSTRAD 
Semanal analiza Contabilidad General + Vencimientos. 



este programa, seguiremos la misma norma 
empleada en otros artículos, que no es más 
que describir exhaustivamente todas sus po¬ 
sibilidades. Cuando se busca un programa de 
contabilidad, normalmente se tienen las cosas 
muy claras, sobre qué se necesita y qué no se 
necesita, por lo que lo mejor para elegir bien 
es saber qué es lo que hace y cómo lo hace 
cada programa. Esperamos así facilitar su 
elección. 



Para empezar, el programa no ofrece pro¬ 
blemas de instalación. Se teclea el habitual co¬ 
mando SUBMIT, seguido del nombre del pro¬ 
grama (contable), y aparece la primera pan¬ 
talla, que advierte sobre la necesidad de co¬ 
piar al disco de datos los ficheros PLAN- 
CO.DAT y CONTAB.AUX para que el progra¬ 
ma no se cuelgue, o dé errores. El programa 
de instalación inicial copia todos los progra¬ 
mas en el disco virtual M: permitiendo así in¬ 
troducir el disco de datos en la unidad A: y 
funcionar así toda la sesión. 

Una vez instalado, aparece el menú princi¬ 
pal, donde están todas las opciones del pro¬ 
grama. Naturalmente, lo primero que hay que 
hacer es elegir la opción INSTALACION DEL 
PROGRAMA, para adecuarlo a nuestras ne¬ 
cesidades. En esta opción se elige el tipo de 
papel que se va a usar, el nombre que apa¬ 
recerá en la cabecera de los listados, el nú¬ 


mero de UNIDADES de disco de las que dis¬ 
ponemos y luego pregunta el número de sub¬ 
cuentas que vamos a necesitar. Este dato es 
vital, porque según el número de cuentas que 
introduzcamos, podremos disponer de más o 
menos asientos. Una vez introducida la cifra, 
nos da el número máximo de apuntes que ad¬ 
mite. 

Una vez hecho esto, el programa vuelve al 
menú principal. Las demás opciones de que 
dispone son: 

— Asientos contables. 

— Plan Contable. 

— Listado de Cuentas de Mayor. 

— Balance de Sumas y Saldos. 

— Cuenta de Resultaaos. 

— Saldo del IVA. 

— Vencimientos. 

Siguiendo un orden cronológico, lógicamen¬ 
te lo primero será dar de alta las cuentas, me¬ 
diante la opción PLAN CONTABLE. Esta op¬ 
ción dispone de un submenú con las siguentes 
opciones: 

— Introducción de Cuentas. 

— Modificación de Cuentas. 

— Baja de Cuentas. 

— Consulta de Cuentas. 

— Listado del Plan Contable. 

— Ordenación de Cuentas. 

— Actualización de Saldos. 

— Poner los Saldos de las Cuentas 
a cero. 

Al seleccionar la introducción de cuentas, 
pasamos a la pantalla que nos pregunta el nú¬ 
mero y el nombre de la cuenta. Si introduci¬ 
mos un número de cuentas ya existente, nos 
avisa de ello. Existen cuatro niveles de cuen¬ 
tas, con uno, dos, tres y siete dígitos respecti¬ 
vamente, y, además, el programa viene ya 
con parte del plan contable introducido, cosa 
que es de agradecer. Naturalmente, para los 
que utilicen planes especiales, se pueden mo¬ 
dificar todas las cuentas, vengan con el pro¬ 
grama o las hayamos introducido nosotros. A 
la derecha de la pantalla, viene el espacio dis¬ 
ponible para seguir introduciendo cuentas, por 
lo que es muy importante calcular bien antes 


de introducirlo en la instalación del programa. 

Como las cuentas no tienen por qué haber¬ 
se metido en orden, después de dar de alta 
el plan conviene utilizar la opción ORDENA¬ 
CION DE CUENTAS, que las clasifica numé¬ 
ricamente. Para prevenir cualquier fallo, es 
conveniente realizar antes una copia de segu¬ 
ridad de los ficheros. 

Las demás opciones permiten modificar una 
cuenta determinada y dar de baja una cuen¬ 
ta, siempre que ésta tenga saldo cero, dado 
que si tiene movimientos no se puede anular. 
Después de bajar alguna cuenta, también es 
necesario ejectuar la opción de ordenación de 
cuentas, para que el programa reconstruya el 
índice de las mismas. 

La opción CONSULTA DE CUENTAS per¬ 
mite consultar una cuenta o grupo de cuen¬ 
tas, con el total de sus movimientos y su sal¬ 
do. Al preguntar al programa el número de 
cuenta, si se le da un número de una, dos o 
tres cifras, presenta todas las cuentas que em¬ 
piecen por el número dado, mientras que si 
se le da un número de siete cifras, presenta 
los movimientos de esa cuenta solamente. 

La opción LISTADO DEL PLAN CONTABLE 
proporciona un listado de todas las cuentas del 
plan, ordenadas numéricamente. 

La opción ACTUALIZACION DE CUENTAS 
pasa los saldos de las subcuentas a los de las 
cuentas de nivel superior, dejando los saldos 
de las subcuentas a cero. Antes de realizar este 
proceso es imprescindible hacer copias de se¬ 
guridad de los ficheros, así como listar las 
cuentas del Libro Mayor y el Balance de Su¬ 
mas y Saldos a nivel 7. 

Volviendo al menú principal, una vez crea¬ 
do el plan contable, se puede empezar a in¬ 
troducir asientos. Al escoger la opción ASIEN¬ 
TOS CONTABLES, aparece un submenú con 
las siguientes opciones: 

— Entrada de Asientos. 

— Anulación de Asientos. 

— Libro Diario. 

— Ordenación del Fichero. 

— Cierre Periódico. 

La introducción de Asientos, eligiendo dicha 
opción, resulta muy sencilla. Primero asigna 
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automáticamente el número de partida, dato 
este que no se puede modificar. Luego pre¬ 
gunta la fecha, comprobando si es correcta, 
el Número de Subcuenta, si ésta existe, visua¬ 
liza su nombre en la última línea, y pregunta 
el concepto, y si la partida es de Debe o Ha¬ 
ber. El programa comprueba que la cuenta in¬ 
troducida exista, así como la fecha, aunque 
los apuntes no tienen por qué ser introducidos 
cronológicamente, puesto que la opción OR¬ 
DENAR FICHERO los reordena de esta ma¬ 
nera. Si se pulsa RETURN en un campo vacío, 
aparece el valor del apunte que está inmedia¬ 
tamente encima del actual, evitando así tener 
que repetir —por ejemplo— el concepto va¬ 
rias veces. En el importe, si éste fuera negati¬ 
vo, admite el signo menos y, además, puntúa 
a la inglesa. Es decir, las comas de separación 
de miles son puntos, y el punto decimal es una 
coma. La parte inferior de la pantalla mantiene 
informado sobre el saldo actual del diario, y 
si se desea salir de esta opción estando la con¬ 
tabilidad descuadrada, un mensaje lo avisa, 
pero permite salir volviendo a pulsar SAL. 

La pantalla tiene una última columna, lla¬ 
mada Ok. donde si el apunte es conforme, al 
pulsar RETURN se valida. En caso contrario, 
pulsando SAL se retorna al principio. Pero ade¬ 
más de esto, poniendo en esta columna una 
V, marca el asiento como el vencimiento pen¬ 
diente, pregunta la fecha de vencimiento del 
apunte. Esto posibilita el control de los venci¬ 
mientos de manera extremadamente cómoda. 

El programa no tiene prevista la opción de 
modificar asientos, por lo cual dado el caso, 
hay que anular el apunte incorrecto, e intro¬ 
ducir de nuevo el apunte correcto. Dado que 
el programa ordena los apuntes por fechas, 
eso no resulta un gran problema, puesto que 
el diario permanece igual. 

La opción de Listar el Libro Diario permite 
elegir entre qué dos fechas se desea, y si se 
desea por pantalla o por impresora. Si se eli¬ 
ge el listado por impresora, pregunta cuál de¬ 
be ser el número de la primera página, así co¬ 
mo la fecha que se desea que aparezca en el 
listado. 

Ya se ha dicho que la opción ORDENA¬ 
CION DE ASIENTOS ordena los apuntes cro¬ 
nológicamente, no obstante, si se ha efectua¬ 
do un cierre periódico en una fecha, y se in¬ 
troduce un asiento ANTERIOR a dicha fecha, 
el saldo de las cuentas no resultará exacto. 

La opción CIERRE PERIODICO posibilita la 
introducción de más apuntes, cuando se ha al¬ 


canzado el límite de la capacidad del disco. 
Para ello, actualiza los saldos de las cuentas, 
borra los asientos y conserva los saldos. Es de 
vital importancia que se haya hecho una co¬ 
pia de seguridad del fichero de asientos, pues¬ 
to que de lo contrario, sería imposible reme¬ 
diar una equivocación anterior a dicho cierre. 
Resulta conveniente, según el número de apun¬ 
tes que se realicen mensualmente, hacer coin¬ 
cidir éste con algún proceso de actualización 
de saldos, para dar mayor coherencia a la es¬ 
tructura de los ficheros. Esta es la última op¬ 
ción de ASIENTOS CONTABLES. 

Retomando pues, el menú principal, la si¬ 
guiente opción es el LISTADO DE CUENTAS 
DE MAYOR. Esta opción presenta, bien por 
pantalla o bien por impresora, los movimien¬ 
tos de la cuenta o cuentas que se le soliciten, 
entre dos fechas dadas. Al igual que en la con¬ 
sulta de asientos, si al pedir la primera y últi¬ 
ma cuenta se introducen cuentas de uno, dos 
o tres dígitos, el listado se realiza a partir de 
estas cuentas y todas las de niveles inferiores. 
De introducir sólo números de subcuentas, no 
listará los niveles anteriores. Además, si se con¬ 
testa en blanco a alguna de las dos pregun¬ 
tas, el programa interpreta que se desea des¬ 
de la primera cuenta y/o hasta la última. Si el 
listado es por impresora, también pregunta la 
fecha que se desea que figure en el listado. 

La siguiente opción del menú principal es el 
BALANCE DE SUMAS Y SALDOS. Este lista¬ 
do, permite elegir el nivel de cuentas al que 
se desea, y su resultado depende directamente 
de dicho nivel. Si no se ha actualizado el fi¬ 
chero de asientos, se podrá pedir a nivel 7, 
que es el máximo de desglose. Entonces, im¬ 
primirá la suma del Debe y la del Haber, así 
como el saldo de todas las subcuentas. Pero 
si se ha hecho ya el proceso de actualización, 
dado que las subcuentas estarán todas con sal¬ 
do cero, no tiene sentido. Pidiéndolo a un ni¬ 
vel superior, los saldos de las cuentas refleja¬ 
rán los movimientos acumulados. 


LA CUENTA DE RESULTADOS refleja el re¬ 
sultado económico del período. Tiene tres op¬ 
ciones: 

— Aportando stock final. 

— Aportando porcentajes sobre 
ventas. 

— Stock inicial = Stock final. 

Con la primera opción, el resultado es el más 
aproximado, dado que sabiendo el stock final 
el programa obtiene el margen real de bene¬ 
ficio que se está cargando a los artículos ven¬ 
didos, obteniendo el resultado exacto. 

La segunda opción realiza la operación al 
revés que la primera. Esto es, se le da el por¬ 
centaje sobre las ventas y en base a éste se 
obtiene de manera aproximada el stock final 
de mercancías. 

La tercera opción es para cuando no haya 
stock de mercancías, o sea imposible conocer¬ 
lo, dependiendo el resultado de esto último. 
Si hubiera existencias, el resultado no es de¬ 
masiado fiable, mientras que si realmente no 
las hay, entonces éste se aproxima más a la 
realidad. 

La siguiente opción es SALDO DEL IVA. Si 
se ha contabilizado normalmente, realiza un 
informe de los movimientos de las cuentas que 
recogen el Impuesto sobre el Valor Añadido, 
que son: 

473 . — IVA Soportado. 

474 . — Hacienda deudora por IVA 
Soportado. 

478 . — IVA Repercutido. 

479 . — Hacienda acreedora por 
IVA Repercutido. 

Para realizar este proceso correctamente, 
hay primero que actualizar las cuentas, de ma¬ 
nera que las cuentas de tres cifras recojan to¬ 
do el saldo, y el resultado sea correcto. Una 
vez revisado el saldo de las dos cuentas de 
IVA, el programa dará el saldo de dicho im¬ 
puesto, y a cuál de las cuentas de Hacienda 
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hay que cargarlo. Naturalmente, aparte de 
los motivos fiscales, es necesario para que el 
programa funcione correctamente, que todo 
apunte de IVA pase a través de las subcuen¬ 
tas de estas dos cuentas. 

La opción de VENCIMIENTOS, utiliza los 
apuntes en los que se marcó dicha clave, pa¬ 
ra ayudar a localizarlos. Dispone de las si¬ 
guientes opciones: 


Pendientes de Pago. 
Pagados. 

Pago de Vencimientos. 
Actualizar fichero. 
Ordenar Vencimientos. 


La primera opción lista los vencimientos pen¬ 
dientes de pago desde la primera fecha que 
se le dé, hasta la segunda. Permite elegir si se 
desea por pantalla o impresora. 

La segunda opción, es idéntica a la anterior 
salvo que lista los pagos ya realizados y ven¬ 
cidos. 

La tercera opción sirve para anotar el pa¬ 
go de los vencimientos. Esta opción, presenta 
una pantalla similar a la de entrada de asien¬ 
tos, y al darle el número del vencimiento, se 
presenta en la pantalla. Si se está conforme 
con esto, se le cambia la situación en la co¬ 
lumna de la derecha a P pagado. Realizar esto 
no significa nada a nivel contable. Si se ha pa¬ 
gado, habrá que realizar un asiento en la con¬ 
tabilidad reflejándolo, y además recogerlo en 
el fichero de vencimientos para que los infor¬ 
mes que realice esta opción sean correctos. 

Cada vez que se realicen bastantes pagos, 
y la capacidad del fichero sea pe¬ 
queña, se utilizará la opción 


ACTUALIZAR FICHERO, que borrará del mis¬ 
mo todos los apuntes que estén pagados y ven¬ 
cidos simultáneamente, ganando así espacio 
en disco. 

Para no variar, en este menú también hay 
una opción que permite ordenar cronológica¬ 
mente los vencimientos, cuyo funcionamiento 
es igual a los otros que se han visto. 

Como conclusiones, la primera sería decir 
que el programa es muy fácil de manejar, bien 
presentado y estructurado. Su manejo no ofre¬ 
cerá complicaciones a nadie. (A nadie que se¬ 
pa contabilidad, claro...) 


No obstante, su potencia no es nada del otro 
mundo. La capacidad de apuntes y cuentas es 
escasa, y se hacen necesarias las engorrosas 
maniobras de actualizar, borrar asientos y 
cambiar discos. En línea, se pueden disponer 
aproximadamente de 1.600 apuntes, con 500 
cuentas y 500 vencimientos simultáneamente, 
en un disco normal. Naturalmente, si se dis¬ 
pone de la segunda unidad de disco de 760, 
la capacidad en asientos se dispara a 9.000..., 
y la cosa cambia un poco. 

Los listados que efectúa son correctos, fal¬ 
tándole al programa, quizás, un poco más de 
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&LIDAD DE EXPEDICION 

IMPORTE 


VENCIMIENTO 


información. Se echa en falta la posibilidad de 
realizar balances de situación. Por lo demás, 
su funcionamiento es impecable. El libro de ins¬ 
trucciones con el que viene acompañado es 
pequeño, pero más que suficiente, explican¬ 
do las cosas con gran claridad. Incluso trae 
información aclaratoria sobre contabilización 
del IVA y, además, trae incorporado ya una 
gran parte del plan de cuentas, cosa de agra¬ 
decer, dado que la tarea más aburrida es dar 
de alta todo un plan de contabilidad, y en es¬ 
te programa esto queda reducido a dar de alta 
las cuentas de último nivel. 
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_(UliUzable sólo en caso de giro de duplicados)... 


HASTA 4000 HA 


0 B 9972219 


Otro aspecto 
muy práctico de 
este programa es 
la incorporación de 
un fichero de vencimien¬ 
tos, que permite tener con¬ 
trolados todos los pagos con 
sus fechas de vencimiento corres¬ 
pondientes. 

La elección de un programa de contabilidad 
depende mucho del tipo de gestión que se 
quiera llevar. La capacidad puede ser un ele¬ 
mento determinante, pero puede no serlo, y 
sí serlo la complejidad del mismo. O ambas 
cosas a la vez. Este es un programa muy sen¬ 
cillo, medianamente potente, apto para llevar 
perfectamente contabilidades de tamaño pe¬ 
queño, de una manera rápida, sencilla y efec¬ 
tiva. Su manejo, además, es de los que no ofre¬ 
cen dudas. Algo nada fácil de lograr. En re¬ 
sumen, un programa muy práctico. 
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ASI SE HACE 
UN PROGRAMA 
DE AJEDREZ 

Luis E. JUAN VIDALES 

En el mercado existen numerosos programas que juegan al ajedrez. Todos los 
aficionados o curiosos por el juego los han usado alguna que otra vez. Este artículo 
explica paso a paso cómo se hace un programa de ajedrez. Los métodos de búsqueda, 

las funciones de evaluación, todo. 


J 

a realización de una má¬ 
quina capaz de ju¬ 
gar al ajedrez ha sido una meta que ha atraí¬ 
do la atención de los hombres durante siglos. 

Ya en 1796, el barón Von Kempelen presen¬ 
taba en Austria un sorprendente autómata ca¬ 
paz de vencer a sus contrincantes humanos, 
entre los que se contaron Napoleón Bonaparte 
y Edgar Alian Poe. Muchos años después se 
comprobó que «El Turco» (que asi se llama¬ 
ba el autómata) albergaba en su interior a un 
experto jugador humano de pequeña estatu¬ 
ra, que era quien en realidad gobernaba los 
mecanismos. 

La primera máquina jugadora de ajedrez 
«sin trampa» fue construida hacia 1890 por 
nuestro Leonardo Torres Quevedo y todavía 
existe y funciona. Se trata de un ingenio elec¬ 
tromecánico capaz de dar mate de torre y rey 
contra rey. 

Sin embargo, el auténtico «padre» del mo¬ 
derno ajedrez por ordenador es el matemáti¬ 
co norteamericano Claude Elwood Shannon, 
quien con su artículo «Programming a Compu¬ 
ter to play chess», publicado en Scientific Ame¬ 
rican en febrero de 1950, estableció los prin¬ 
cipios fundamentales que todavía constituyen 
la base de casi todos los programas de aje¬ 
drez para ordenador, entre ellos las famosas 
«Estrategias A y B» que se verán más 
adelante. 

El objetivo del presente artículo es exponer 
las ideas y elementos básicos necesarios para 
la implementación de un programa de ajedrez 
y nuestra secreta ilusión, que algunos de nues¬ 
tros lectores se sientan suficientemente anima¬ 
dos como para intentar llevarlos a la práctica. 


A éstos les auguramos interminables horas 
de experimentación absorbente e instructiva. 


ELEMENTOS DEL JUEGO 


El primer obstáculo a superar cuando se pre¬ 
tende programar un ordenador para jugar al 
ajedrez es, obviamente, el de cómo «explicar¬ 
le» en qué consiste el juego. 

Dado que el ordenador es un ente capaz so¬ 
lamente de almacenar y manipular números 
(a velocidad vertiginosa, desde luego), no sólo 
es necesario convertir la realidad física de un 
tablero de 64 casillas y 32 piezas de 12 tipos 
diferentes en una estructura matemática fácil¬ 
mente procesable por el ordenador, sino tam¬ 
bién trasladar sus complejas reglas a funcio¬ 
nes numéricas y, todavía más importante, re¬ 
ducir a ecuaciones todo el conocimiento tác¬ 
tico y estratégico que marca la diferencia en¬ 
tre un auténtico jugador de ajedrez y alguien 
que sólo sabe mover las piezas. 

Así pues, los elementos que definen las ta¬ 
reas a realizar por todo programa de ajedrez 
son los siguientes: 

a) Representación de posiciones. 

b) Generación de movimientos. 

c) Evaluación de posiciones. 

d) Estrategia de búsqueda. 

En los siguientes apartados estudiaremos la 
implementación de los elementos enunciados, 
haciendo observar que, mientras los dos pri¬ 
meros están ya plenamente conseguidos so¬ 
bre un ordenador, no existe (todavía) un al¬ 
goritmo óptimo para los dos últimos, siendo 


precisamente la evaluación de posiciones la 
que determina la potencia de juego del pro¬ 
grama y la estrategia de búsqueda, su eficien¬ 
cia en términos de economía de tiempo. 

Hemos excluido el tratamiento de presenta¬ 
ción de datos, que puede ir desde el simple 
código algebraico hasta los gráficos tridimen¬ 
sionales, pasando por coordenadas a base de 
LED's, por ser un tema secundario e indepen¬ 
diente del núcleo del programa. 


REPRESENTACION DE POSICIONES 


Aunque la representación numérica más in¬ 
mediata de un tablero de 8x8 casillas sería 
una matriz de 8 X 8 elementos, en la práctica, 
y debido a las consideraciones que haremos 
a continuación, se prefiere utilizar un tablero 
de 10x12, representado por una matriz uni¬ 
dimensional de 120 elementos (ver Figura 1). 

En efecto, mediante la disposición en 10 x 12 
se puede establecer un «borde» en torno al ta¬ 
blero de 8 X 8 a base de casillas en las que se 
almacena un código especial, que permite la 
detección inmediata de cuándo una pieza se 
«sale» del tablero. El utilizar 10x12 y no 
10x10 se debe al particular movimiento del 
caballo, que salta 2 casillas de una vez. 

(El hecho de no ser necesario un tablero de 
12x12 lo dejamos a la curiosidad del lector). 
Finalmente, el empleo de una matriz unidimen¬ 
sional se debe a la estructura lineal de la me¬ 
moria del ordenador y a la circunstancia de 
que éste no necesita, como nosotros, repre¬ 
sentar «visualmente» un tablero cuadra- 
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do. No obstante, en los diagramas que se in¬ 
cluyen en estos artículos se representa la par¬ 
te central de dicha matriz en forma de 8x8 
para facilitar su comprensión, quedando so¬ 
breentendida su verdadera representación en 
la memoria del ordenador. 


4 

bp 

tal. 

0 

Cuadro vacío 

0 

1 

Peón 

-1 

2 

Peón recién movido dos cuadros 

-2 

3 

Caballo 

-3 

4 

Alfil 

-4 

5 

Torre no movida 

-5 

6 

Torre movida 

-6 

7 

Dama 

-7 

8 

Rey no movido 

-8 

9 

Rey movido 

-9 

255 

Cuadro exterior al tablero 

255 


TABLA 1 


En cuanto a las piezas, existen numerosos 
sistemas de representación posibles, si bien no¬ 
sotros preferimos el de la Tabla 1, ya que sim¬ 
plifica la aplicación de las reglas del enroque 
y de la captura «al paso» de los peones. A 
la izquierda se representan los códigos de las 
piezas del programa y a la derecha, los de las 
piezas del contrincante. Obsérvese que el có¬ 
digo de representación de las piezas no equi¬ 
vale al valor de dicha pieza en la evaluación 
de material. 


GENERACION DE MOVIMIENTOS 


Las funciones generadoras de movimientos 
deberán ser capaces de calcular, para cada 
pieza, la lista de movimientos válidos o lícitos, 
es decir, aquellos de los posibles que no con¬ 
tradigan las reglas del ajedrez. Por ejemplo, 
supongamos al rey blanco enrocado en la ca¬ 
silla 27 de la Figura 1. Sus movimientos posi¬ 
bles serán a las casillas 16,17,18, 26, 28,36, 
37 y 38. Ahora bien, las casillas 16, 17 y 18 
contienen el código de «borde» y en las 26, 
37 y 38 hay una torre y dos peones, respecti¬ 
vamente. Si el rey se ve atacado por un alfil 
negro en la casilla 36, sus únicos movimien¬ 
tos lícitos serán 36 (capturando al alfil) o 28. 

En el mismo ejemplo, podría suceder que el 
alfil negro estuviera defendido por, digamos, 
un caballo negro. En este caso, al estudiar el 
programa la continuación correspondiente al 
movimiento 27-36, hallaría que una de las res¬ 
puestas posibles de las negras sería capturar 
al rey blanco, por lo que, «a posteriori» 
en este caso, dicho movimiento también sería 
considerado como ilícito. 

La forma más simple que pueden adoptar 
las funciones generadoras de movimientos es 
la de tablas de incrementos relativos a la ca¬ 


silla (ver Tabla 2) complementadas por una se¬ 
rie de condicionales y verificadores de la lici¬ 
tud de los movimientos. Véase cómo la mayor 
complejidad de movimientos corresponde al 
peón y no al caballo, debido fundamentalmen¬ 
te a su modo de capturar (tanto normal como 
al paso), diferente del de las demás piezas; asi¬ 
mismo, la función generadora deberá incluir 
la promoción del peón que llega a la octava 
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FIGURA 1 
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TABLA 2A 
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TABLA 2B 


fila. En cuanto a las piezas llamadas «desli¬ 
zantes» (dama, torre y alfil), un flag adicio¬ 
nal indica al programa que puede continuar 
explorando una determinada dirección incre- 
mental mientras siga encontrando casillas vacías. 

En la Tabla 2b, las condiciones asociadas a 
los movimientos respectivos de la Tabla 2a son 
las siguientes: 


Oz No hay condición. 

1 = Si la casilla destino está vacía. 

2 = Sólo desde fila 3 (ver Figura I). 

3 = Sólo desde fila 8. 

4 = Si en casilla destino hay una pieza con¬ 
traria. 

5 = Si en casilla origen -1 hay un peón con¬ 
tado código 2. 

6 = Si en casilla origen +1 hay un peón con¬ 
trario código 2. 

7 = Reglas enroque corto. 

8 = Reglas enroque largo. 

Nótese que el enroque está considerado como 
movimiento de rey. 


EVALUACION DE POSICIONES 


Un programa que desarrollara exclusiva¬ 
mente los dos elementos anteriormente ex¬ 
puestos se limitaría a mover (muy correcta¬ 
mente, eso sí) las piezas sin ningún tipo de plan 
estratégico, ni siquiera táctico, ignorando com¬ 
pletamente el fin último del ajedrez, que es el 
de dar mate al rey contrario. 

Esta regla fundamental, «dar mate al 
rey contrario», tan fácil de enunciar, es ex¬ 
traordinariamente difícil de hacérsela com¬ 
prender a un ordenador, hasta el punto de que 
sólo son posibles aproximaciones indirectas 
basadas en los dos principios siguientes: 

a) Una mejora progresiva de la posición 
de las piezas propias respecto a las del con¬ 
trario acabará conduciendo al mate. 

b) El contrario siempre intentará mantener 
la posición de sus piezas tan buena como le 
sea posible. 

El desarrollo del primer principio requiere 
unas funciones de evaluación de la posición, 
y el del segundo, unas estrategias de búsqueda. 

La fuerza de juego de un programa de aje¬ 
drez viene determinada fundamentalmente 
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por la calidad de su fundón evaluadora de po¬ 
siciones. Esta suele adoptar la forma siguiente: 
F=kifi + k2Í2+... + k n f n 

donde fi, f 2 ... f n son las funciones parciales 
que evalúan diversos factores de la posición 
(material, movilidad, estructura de peones, 
etc.) y ki, k 2 ... k„ son los coeficientes de pon¬ 
deración relativa de cada factor, que pueden 
variar según la fase del juego en que se en¬ 
cuentre la partida (apertura, medio juego o 
final). 

La misión de la función evaluadora es asig¬ 
nar un valor numérico único a cada posición 
originada por el generador de movimientos, 
que representa la «bondad» de dicha posición 
(tanto en valor absoluto como en signo), y en 
base al cual la estrategia de búsqueda deci¬ 
dirá el movimiento a realizar en cada turno 
de juego. Evidentemente, cuanto mayor sea 
el número (n) de factores considerados, más 
precisa será la función F, pero mayor será el 
tiempo de proceso requerido. 



A continuación se exponen las principales 
funciones parciales de evaluación de la posi¬ 
ción, fi. 


MATERIAL 


Es la característica más importante del aje¬ 
drez y está constituido por las piezas presen¬ 
tes en el tablero por parte de cada bando, ca¬ 
da una con su valor relativo. El valor asigna¬ 
do generalmente a los distintos tipos de pie¬ 
zas es: 

PEON = l TORRE=5 

CABALLO=3 DAMA=9 

ALFIL=3 REY=200 

(en realidad, infinito) 
La función adopta simplemente la fórmula: 
U = (E Valores piezas propias)— (E Valores 
piezas contrarias). 
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FIGURA 2 


Inicialmente, por tanto, fi=239—239=0. 

Se puede afirmar la valoración de las pie¬ 
zas asignando, por ejemplo, un 3.5 a los alfi¬ 
les cuando está la pareja del color en el table¬ 
ro o a los caballos en las posiciones cerradas. 

Finalmente, diremos que con esta única fun¬ 
ción el programa comienza ya a comportar¬ 
se como un jugador, si bien su juego resulta 
un tanto primitivo. 


MOVILIDAD 


Ocupa el segundo lugar en importancia y 
consiste en el número total de movimientos lí¬ 
citos «a priori» que el programa puede reali¬ 
zar con sus piezas. Como ejemplo, obsérvese 


que desde la posición inicial de partida cada 
bando tiene una movilidad=20 (2x8 movi¬ 
mientos lícitos del peón más 2x2 de caballo). 
La función puede adoptar la forma siguiente: 

^ _ (Mov. p. propias)—(Mov. p. contrarias) 

2 (Mov. p. propias)+(Mov. p. contrarias) 

Inicialmente, f 2 = |j^|j =0 


DESARROLLO 


Se trata de un concepto fácil de compren¬ 
der pero difícil de cuantificar. Grosso modo, 
las piezas están desarrolladas cuando se ha¬ 
llan fuera de sus cuadros iniciales; no obstan¬ 
te, la buena práctica del ajedrez aconseja de¬ 
sarrollar primero caballos y alfiles, enrocar a 
continuación y, finalmente, desarrollar torres 
y dama. Asimismo, por regla general el en¬ 
roque es más importante cuando la dama con¬ 
traria se encuentra todavía en el tablero, de¬ 
bido a su peligrosa acción potencial sobre un 
rey ubicado en el centro. 

Son muchas las funciones de evaluación po¬ 
sibles y aún más las excepciones a las reglas 
enunciadas más arriba. A título de ejemplo, 
presentamos la función propuesta por David 
Levy: 

f 3 =D/3—U/4—C.E. 

siendo: 

D = N.° de caballos y alfiles propios fuera 
de sus cuadros iniciales (incluyendo los 
que han sido capturados). 
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U=0 si la dama propia no se ha movido o 
ha sido ya capturada. 

= N.° de piezas propias no desarrolladas, 
en el resto de los casos. 

C=2 si la dama contraria está en el tablero 

= (l—P/4) en caso negativo, siendo P el 
n.° de torres, caballos y alfiles contra¬ 
rios capturados hasta ese momento. 

E = O si el programa ya ha enrocado. 

= 1/4 si el programa no ha enrocado, pe¬ 
ro podría hacerlo por cualquiera de los 
lados. 

= 1/3 si ya no es posible el enroque lar¬ 
go. 

= 2/3 si ya no es posible el enroque cor¬ 
to. 

= 1 si se ha perdido el derecho a enrocar. 

A pesar de su aparente arbitrariedad, se 
puede comprobar mediante un análisis dete¬ 
nido que esta Í 3 evalúa el desarrollo de las 
piezas con una precisión bastante aceptable. 

Incialmente, D=0, U=0, C=2, E=1/4. Por 
tanto, Í3=0.5 


DOMINIO DEL CENTRO 


El dominio del centro es uno de los princi¬ 
pales objetivos del desarrollo de piezas, da¬ 
do que desde las casillas centrales una pieza 
puede atacar más cuadros que desde los bor¬ 
des y, por supuesto, más que desde las esqui¬ 
nas. Para evaluar esta característica, la fun¬ 
ción correspondiente posee una tabla de pun¬ 
tuación asociada a cada casilla (ver figura 2), 
efectuando la operación siguiente: 

f 4 = -C Puntos asociados a casillas atacadas 
por piezas propias). 

Cabe la posibilidad de hacer más agresivo 
el programa desplazando el «centro» de la ta¬ 
bla de puntuación hacia las filas contrarias e 
incrementando el valor de las casillas del opo¬ 
nente, tal como se muestra en la figura 3, re¬ 
ferida en este caso a las blancas. 

(Nota: f4 tiene en cuenta las casillas ata¬ 
cadas debido a que, en principio, toda casi¬ 
lla atacada es «ocupable». Una función al- 


9 

10 

11 

12 

12 

11 

10 

9 

9 

12 

13 

14 

14 

13 

12 

9 

9 

12 

14 

15 

15 

14 

12 

9 

9 

12 

14 

15 

15 

14 

12 

9 

8 

11 

13 

14 

14 

13 

11 

8 

6 

9 

11 

12 

12 

11 

9 

6 

4 

7 

8 

9 

9 

8 

7 

4 

2 

3 

4 

5 

5 

4 

3 

2 


FIGURA 3 


ternativa más simple se puede obtener suman¬ 
do directamente los puntos asociados a las ca¬ 
sillas ocupadas por piezas propias). 


ATAQUE AL REY 


El método más simple de evaluar la fuerza 
de nuestro ataque sobre el rey contrario se ba¬ 
sa en la misma ¡dea de la función anterior, con 
la diferencia de que, en este caso, la tabla de 
puntos asociados a cada casilla es dinámica 
y está referida a la posición del rey contrario. 


0 

1 

2 

4 

8 

8 

8 

4 

0 

1 

2 

4 

8 

8 

8 

4 

0 

1 

2 

4 

4 

4 

4 

4 

0 

1 

2 

2 

2 

2 

2 

2 

0 

1 

1 

1 

1 

1 

1 

1 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 


FIGURA 4 


En la figura 4 se representa dicha tabla para 
las blancas, suponiendo que el rey negro es¬ 
tuviera en la casilla 96 (fg). 

$¡=(E Puntos asociados a casillas atacadas 
por piezas propias). 


SEGURIDAD DEL REY 


Un rey está mejor defendido cuanto menor 
sea el valor de las piezas defensoras y más 
próximas estén de aquél estas últimas. Asimis¬ 
mo, una pieza defendida es aún mejor defen¬ 
sora del rey. Estas consideraciones pueden 


FIGURA 5 



materializarse de la forma siguiente: 

f*=£¡^(N i+ l) 

siendo: 

Q¡ = Proximidad de la pieza defensora i al 
rey propio según los balores de la ta¬ 
bla de «ataque al rey» (es decir, 8 pa¬ 
ra casillas inmediatas, 4 para la capa 
siguiente, etc.), aplicada al rey propio. 

V¡ = Valor material de la pieza defensora i. 

N¡=N.° de piezas propias, incluido el rey, 
que defienden a su vez a la pieza de¬ 
fensora i. 


ESTRUCTURA DE PEONES 

La estructura de peones constituye el «esque¬ 
leto» de la posición y suele ser decisiva cuan¬ 
do se alcanza la fase final de la partida. Exis¬ 
ten tres tipos de peones que influyen negati¬ 
vamente en la estructura: 

a) Peones doblados, cuando existen 2 o 
más del mismo color en una columna, (figura 
5, Pb 2 y Pb 3 ). 

b) Peón aislado, si no hay otros de su co¬ 
lor en las columnas adyacentes, (figura 5, 

Paz). 

e) Peón rezagado, cuando no existe nin¬ 
gún peón de su mismo color en las columnas 
adyacentes que esté más retrasado que él. (fi¬ 
gura 5, Pf 2 ). 

Por el contrario, hay un tipo de peón cuya 
influencia en la estructura es positiva, especial¬ 
mente de cara al final (hasta el punto de que 
puede resultar más valioso que una pieza ma¬ 
yor, por su posibilidad de promoción al llegar ¡u 

a 8. a fila): 

d) Peón pasado, aquél que no tiene con¬ 
trarios en su misma columna ni en las dos ad¬ 
yacentes. (figura 5, Pe 4). 


— 
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La función que evalúa la estructura de peo¬ 
nes para las blancas puede ser del tipo de: 

f 7 =^rE 1 G i -N R -4 N a 
M+ l 

siendo: 

M = Material total en el tablero, excluidos 
ambos reyes. 

G¡ = Fila ocupada (de 2 a 7) por el peón 
pasado i de las blancas. 

N r = N.° de peones blancos rezagados. 
Nd=N.° de peones blancos doblados. 
Na = N.° de peones blancos aislados. 

En la figura 5, f 7 = —0.33 para las blancas 
y f 7 = —4 para las negras. 


No se trata tanto de establecer una función 
específica, como de detectar cuándo una par¬ 
tida ha entrado en dicha fase y obrar en con¬ 
secuencia, modificando sutilmente el compor¬ 
tamiento del programa. 

La técnica de finales es la parte más difícil 
de plasmar en un programa de ordenador de¬ 
bido a que las circunstancias más aparente¬ 
mente negligibles pueden decidir el resultado 
final de la partida. (Es sabido que, a igualdad 
de material, el hecho de que un rey esté en 
una casilla o en la adyacente puede invertir 
dicho resultado). No obstante, sobre tal dificul¬ 
tad, se pueden establecer algunos criterios úti¬ 
les en el tratamiento de esta fase de la partida: 

a. Los coeficientes de ponderación, k, de 
las distintas funciones se deberán acomodar 
a la nueva situación. Por ejemplo, en esta fa¬ 
se adquieren mayor importancia el material 


y la estructura de peones y menor, el dominio 
del centro y la seguridad del rey, entre otras. 

b. Los peones pasados, en particular, son 
de la máxima importancia, debiendo ser de¬ 
fendidos preferentemente por torres coloca¬ 
das detrás y no debiendo ser obstaculizados 
por piezas propias. El programa debería bo¬ 
nificar y penalizar respectivamente tales de¬ 
fensas y obstáculos. 

c. En un final de sólo peones, el rey con¬ 
trario debe ser forzado, en lo posible, a salir 
del «cuadrado del peón» pasado propio. 
El concepto de «cuadrado del peón» no 
es exclusivo del ajedrez por computador y con¬ 
siste en el cuadrado definido por el vértice (ca- 

FIGURA 6 


Las funciones analizadas hasta este momen¬ 
to realizan una evaluación de las característi¬ 
cas «estáticas» de una posición. Sin embargo, 
es muy interesante que el programa dispon¬ 
ga de una función capaz de estimar de algu¬ 
na manera las cualidades tácticas de la posi¬ 
ción en términos de posibilidad de ganancia 
de material o, incluso, de mate al rey contra¬ 
rio. Dicha función podría formularse en los tér¬ 
minos siguientes: 


donde: 

V¡=Valor material de la pieza contraria ata¬ 
cada i. 

Vh = Valores materiales de las piezas propias 
¡ que atacan la pieza i. 

Vj= Valores materiales de la piezas contrarias 
h que defienden a su compañera i. 


ATAQUE Y DEFENSA DE PIEZAS 


FINALES DE PARTIDA 


silla) ocupado por el peón y la 8. a fila, hacia el 
lado del rey contrario. Si dicho rey está fuera del 
cuadrado cuando le toca mover al peón, no 
podrá evitar que éste llegue a 8. a fila. (En la 
figura 6, las blancas ganan con l.TxT+ RxT). 

d. Cuando el rey contrario ha quedaao 
compeltamente solo, el programa debe dispo¬ 
ner de un buen algoritmo para arrinconarlo. 
Se puede hacer simplemente en la misma ta¬ 
bla de puntuación empleada en la función 
«Dominio del centro» (aplicada al rey 
contrario), combinada con un algoritmo que 
procure aproximar ambos reyes. Está claro 
que el programa siempre elgirá el movimien¬ 
to que minimice la puntuación del rey contra¬ 
rio, con lo cual éste será empujado progresi¬ 
vamente hacia una esquina. Por otra parte, 
la conveniencia de que el rey propio esté pró¬ 
ximo resulta obvia. 


ESTRATEGIAS DE BUSQUEDA 


Según la teoría de juegos, un juego es un 
conjunto de reglas unívocas que determinan 
en todo momento el comportamiento de los ju¬ 
gadores. La principal característica de los jue¬ 
gos, y del ajedrez entre ellos, es que las pér¬ 
didas o ganancias de cada jugador no depen¬ 
den sólo de sus propias acciones u omisiones, 
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sino también del comportamiento del contra¬ 
rio. Cada jugador decide su siguiente movi¬ 
miento a la vista de la situación existente cuan¬ 
do le toca el turno, pero se puede afirmar que 
los jugadores tienen previsto de antemano que 
lo que harían en cualquiera de las circunstan¬ 
cias posibles. El «catálogo» de las decisiones 
para todas las situaciones posibles es, preci¬ 
samente, lo que se denomina «estrategia». 

Un juego de las características del ajedrez 
permite la aplicación de todo tipo de sistemas 
clásicos de exploración del árbol de varian¬ 
tes y búsqueda en grafos. En el presente artí¬ 
culo nos limitaremos a exponer los más típi¬ 
cos y representativos, sin pretender hacer una 
enumeración exhaustiva. 


EXPLORACION DEL ARBOL 


El árbol de variantes se forma al conside¬ 
rar, a partir de una posición dada llamada 
raíz, las secuencias formadas por todos los mo¬ 
vimientos lícitos que puede efectuar el progra¬ 
ma, todas las respuestas del contrincante a ca¬ 
da uno de ellos, todos los nuevos movimien¬ 
tos que puede realizar el programa como con¬ 
trarréplica a los del contrincante, etc., hasta 
llegar al nivel determinado por la profundidad 
de búsqueda. Para tener una idea del tama¬ 
ño del árbol, diremos que en una posición de 
ajedrez hay un promedio de 37 movimintos lí¬ 
citos a disposición del jugador al que le toca 
mover; por lo tanto, un árbol de profundidad 
4 tendrá una media de 1.900.000 variantes, 
equivalentes a otras tantas posiciones termi¬ 
nales a evaluar mediante la correspondiente 
función F. Dado que con profundidad 4 sólo 
se analizan 2 jugadas completas (2 movimien¬ 
tos por parte de cada bando), se comprenderá 
la importancia de dotar al programa de una 
estrategia de búsqueda lo más eficiente posible. 


METODO MINIMAX 


En la figura 7 se representa la explosión 
combinatoria de un árbol de variantes de pro¬ 
fundidad 4, relativamente «poco frondoso». La 
posición raíz es PO, con el turno de juego en 
poder del programa. Una de las posiciones 
terminales, por ejemplo la P1232, se alcanza¬ 
ría después de la siguiente secuencia de mo¬ 
vimientos: 

Programa Contrincante 

1. MI M12 

2. M123 M1232 

En las posiciones terminales el turno de jue¬ 
go vuelve a estar en poder del programa, in¬ 
dicándose a la derecha la puntuación obteni¬ 
da por cada una de ellas al aplicar la función 
evaluadora F. 

El método minimax se basa en el segundo 
de los principios enunciados en el apartado 5 


de estos artículos; el programa «reflexionaría» 
de la manera siguiente: 

a. La posición terminal más deseable se¬ 
ría la P1223, que posee la puntuación más alta 
de todas (12 puntos). 

b. Sin embargo, mi contrincante mueve 2 
veces antes de que lleguemos a cualquiera de 
las posiciones terminales y juega (por lo me¬ 
nos) tan bien como yo, por lo cual no debo 
esperar que elija precisamente los movimien¬ 
tos que más me favorecen. 

c. Así pues, debo conformarme y elegir el 
movimiento que conduzca a la mejor posición 
terminal posible suponiendo que, siempre que 
mueve él, elige el movimiento más perjudicial 
para mí. 

En una búsqueda a profundidad 4, el pro¬ 
grama deberá encontrar el máximo de los mí¬ 
nimos de los máximos de los mínimos, razón 
por la que el método recibe el nombre de «mi¬ 
nimax». En el árbol de la figura 7, la mejor 
posición terminal posible es la P1231 con 5 
puntos y, por tanto, el movimiento a efectuar 
es el MI. La variante principal es la secuen¬ 
cia de movimientos: MI, MI2, MI23, MI231. 

Para llegar a tal conclusión, el programa 
evalúa todas y cada una de las posiciones ter¬ 
minales y luego «remonta» las puntuaciones 
hasta la posición raíz PO, de acuerdo con el 
siguiente criterio: 


A) Si en una posición el turno de juego es¬ 
tá en poder del contrincante, se le asigna la 
puntuación mínima de las posiciones deriva¬ 
das. 

B) Si en una posición el turno de juego es¬ 
tá en poder del programa, se le asigna la pun¬ 
tuación máxima de las posiciones derivadas. 

En la figura 7 se indican entre paréntesis las 
puntuaciones remontadas de cada posición. 
La posición terminal «minimax» es, obviamen¬ 
te, aquélla cuya puntuación «se transmite» has¬ 
ta la posición raíz. 


ALGORITMO ALFA-BETA 


Es fácil imaginar que la aplicación directa 
del exhaustivo método minimax a una posición 
real de mitad de partida puede resultar cos¬ 
tosísima en lo que a tiempo de proceso se re¬ 
fiere. Para acelerar el cómputo y mejorar su 
eficiencia existen diversos algoritmos que «po¬ 
dan» el árbol de variantes, reduciendo drás¬ 
ticamente el número de evaluaciones necesa¬ 
rias en la exploración del árbol. Uno de los 
más conocidos y eficientes es el llamado «al¬ 
goritmo alfa-beta», que debe su nombre a la 
utilización de dos variables: 

ALFA, que representa la mejor puntuación 


FIGURA 7 
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que puede conseguir el contrincante. Su va¬ 
lor inicial es + oo (recuérdese que, para el con¬ 
trario, es la pero puntuación posible, ya que 
razona al revés que el programa). 

BETA, que representa la mejor puntuación 
que puede lograr el programa. Su valor ini¬ 
cial es —oo. 

Alfa es el elemento «minimizante» y beta, el 
«maximizante». El algoritmo va, alternativa- 

FIGURA 8 



mente, poniéndose en el lugar del contrincante 
y en el del programa y sefeccionando la me¬ 
jor puntuación posible para ambos bandos, re¬ 
chazando sin evaluar ramas derivadas de una 
posición cuando la información acumulada 
hasta ese momento convierte en redundante 
su examen. 

En la figura 8 se representa una implemen- 
tacióndelalgoritmo particularizado para una 
profundidad de 4 movimientos, por lo cual se 
emplean dos parejas de variables alfa-beta: 
(a/3 y (A, 5^. Los sucesivos subíndices de las po¬ 
siciones terminales están representados por i, 
¡, k, n. Asimismo, I, J, K, N, simbolizan la últi¬ 
ma rama a examinar desde la posición corres¬ 
pondiente. El algoritmo entrega las salidas si¬ 
guientes: 

B = puntuación remontada de la posición 
raíz, PO. 

W = índice del movimiento a efectuar des¬ 
de PO. 

Aplicando el algoritmo alfa-beta al árbol de 
la figura 7, se llega exactamente a la misma 
conclusión que con el método minimax, pero 
evaluando solamente 16 posiciones termina¬ 
les de las 32 que contiene el árbol (las marca¬ 
das con *). 

Aunque este ahorro del 50 por 100 no es 
en absoluto despreciable, es insignificante 
comparado con la eficiencia que el algoritmo 
alfa-beta consigue cuando se aplica sobre ár¬ 
boles complejos (que son los que se dan en la 


práctica). Llamando «r» al número de ramas 
que salen de una posición y «p» a la profundidad 
de búsqueda, el número de posiciones termi¬ 
nales a partir de una posición raíz será r p . 

Se demuestra matemáticamente que el al¬ 
goritmo alfa-beta, trabajando en condiciones 
óptimas (es decir, examinando en primer lu¬ 
gar los movimientos mejores), sólo necesita 
evaluar 2 r p posiciones terminales. Esto sig¬ 
nifica que, en un árbol de r=37 y p = 4, en el 
que hay 1.874.161 posiciones terminales, el 
algoritmo sólo examinaría 2.738, lo cual su¬ 
pone un ahorro de nada menos que un 99,85 
por 100. 

En la práctica se procura, mediante méto¬ 
dos empíricos, que el algoritmo trabaje en las 
mejores condiciones posibles, siendo típico al¬ 
canzar eficiencias superiores al 99,3 por 100. 


ESTRATEGIA SHANNON TIPO A 


Llamada también «método de la fuer¬ 
za bruta», es la estrategia de búsqueda más 
primitiva y se basa en la aplicación rigurosa 
del método minimax con o sin algoritmo alfa- 
beta. El árbol se forma hasta una profundidad 
determinada, incluyendo, por supuesto, todas 
las variantes y la evaluación de posiciones se 
realiza siempre en dicha profundidad, sin im- 
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portar si las posiciones terminales son «tran¬ 
quilas» o «turbulentas». El principal de¬ 
fecto de esta estrategia es su «miopía», de¬ 
bida a la imposibilidad de ver más allá de la 
profundidad predeterminada, la cual hace que 
en ocasiones el programa elija el movimiento 
aparentemente más prometedor y con ello se 
sitúe al borde del abismo, especialmente cuan¬ 
do la posición terminal está en medio de un 
intercambio de piezas. No obstante, esta es¬ 
trategia es la más difundida en programas de 
ajedrez para ordenador y sus resultados son 
bastante aceptables, siempre que la profun¬ 
didad de búsqueda sea suficiente. 



ALGORITMO DE INTERCAMBIO 


Ideado para paliar los inconvenientes de la 
estrategia tipo A, se basa en el mantenimien¬ 
to, para cada casilla de las 64 que componen 
el tablero, de dos listas actualizadas (una por 
bando) en las que figuran las piezas que ata¬ 
can dicha casilla, ordenadas de menor a ma¬ 


yor valor material, o en orden de captura si 
éste viniera obligado por la ubicación de las 
piezas. 

El algoritmo computa el valor de ocupar una 
determinada casilla o de capturar en una ca¬ 
silla ocupada por el contrincante, para el ban¬ 
do al que le toca mover. El valor de intercam¬ 
bio de una casilla es la ganancia material que 
puede esperar el bando al que le toca mover 


si lleva hasta el final la secuencia de capturas 
o cambios que es posible en dicha casilla. Por 
medio de este valor, el programa puede de¬ 
cidir si merece o no la pena realizar una de¬ 
terminada captura o, incluso, si la ocupación 
de una cierta casilla es segura o no. 

La aplicación del algoritmo es simple: supo¬ 
niendo que cierta casilla está ocupada por la 
pieza contraria de valor Co, que es definida 
por Ci, C2 y C3, y que está bajo el ataque de 
las piezas propias Pi, P2 y P3, si el programa 
inicia la captura con Pi, obtiene una ganada 
de material Gi =Co- Si el contrario responde 
capturando a su vez, G2=Co— Pi. Una nue¬ 
va captura llevaría a G 3 =Co— Pi +Ci, aue se 
convertiría en G 4 = Co—Pi +Ci—P 2 si el con¬ 
trincante vuelve a responder, etc. De esta ma¬ 
nera se puede ver cuál es el mejor momento 
para detener la serie de capturas o si, por el 
contrario, es preferible no llegar a iniciarla. 

Las dos limitaciones del algoritmo son debi¬ 
das a funciones extras que puede estar desem¬ 
peñando alguna de las piezas involucradas en 
el intercambio y que el algoritmo ignora: pie¬ 
zas clavadas y piezas con doble función de 
apoyo (sobrecargadas). 


ESTRATEGIA SHANNON TIPO B 


A la vista de los inconvenientes de la estra¬ 
tegia tipo A, Shannon propuso una estrategia 
tipo B, que se aproxima mucho más al com¬ 
portamiento de un jugador humano. En este 
caso, la profundidad de búsqueda no está to¬ 
talmente predeterminada, sino que el progra¬ 
ma trata de todas las posiciones terminales, 
a partir de una profundidad mínima, sean del 
tipo «estático» (es decir, que ninguno de los 
movimientos posibles a partir de ellas implique 
toma de material), prolongando la búsqueda 
en aquellas ramas del árbol donde sea preci¬ 
so para lograrlo. 

Por ejemplo, el programa puede construir 
el árbol de variantes hasta profundidad 2 y 
luego seguir buscando hasta profundidades 
mayores sólo en las variantes en que todos los 
movimientos sean capturas, jaques o réplicas 
a jaques, deteniéndose cuando éstas alcanzan 
posiciones terminales estáticas. 
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La base de esta estrategia reside en la mu¬ 
cho mayor fiabilidad de las funciones evalua¬ 
doras en las posiciones estáticas y su mayor 
inconveniente es el peligro de una prolonga¬ 
ción excesiva de la búsqueda en posiciones 
muy «turbulentas». A este respecto, la estra¬ 
tegia tipo B también puede ser complementa¬ 
da con el algoritmo de intercambio para limi¬ 
tar la búsqueda. 


BIBLIOTECA DE APERTURAS 


Todo programa de ajedrez que se precie de¬ 
be poseer una biblioteca de aperturas lo más 
extensa posible. Las ventajas que ello repor¬ 
ta son numerosas: 

a. Se reduce drásticamente el tiempo de 
cálculo para los primeros movimientos. 

b. Se aumentan las probabilidades de lle¬ 
gar a la fase de medio juego con una posición 
casi óptima a nivel teórico. 

c. Se da variedad al juego frente a un con¬ 
trincante humano, ya que, por su naturaleza 
matemática, las funciones evaluadoras y es¬ 
tratégicas darían siempre los mismos resulta¬ 
dos a partir de unos mismos datos de parti¬ 
da. 

La manera de organizar una biblioteca de 
aperturas es relativamente simple; puede 
adoptar la forma de tabla indexada, donde 
a cada movimiento le corresponden 2 bytes: 
casilla origen y casilla destino (o casilla origen 
e incremento). Mientras el oponente siga una 
determinada variante, el programa se limita¬ 
rá a extraer su movimiento de la biblioteca. 
Cuando el contrincante se aparte de la línea 
de juego almacenada, conmutará automáti¬ 
camente al método general de cálculo. En los 
casos en que los movimientos posibles sean 
múltiples para el programa (por ejemplo, si le 
toca iniciar la partida), la selección se hará me¬ 
diante un procedimiento aleatorio. 

Se deberían codificar como mínimo las aper¬ 
turas más importantes, incluyendo todas las 
variantes que la moderna teoría ajedrecística 
sanciona como superiores, hasta una profun¬ 
didad de 4 a 10 jugadas (dobles movimien¬ 
tos), según los casos. El volumen de memoria 
ocupado por una buena biblioteca de aper¬ 
turas puede llegar a igualar la propia exten¬ 
sión del programa de cálculo, pero los bene¬ 
ficios obtenidos lo justifican. No hay que olvi¬ 
dar que la teoría de aperturas constituye una 
parte fundamental de los conocimientos de to¬ 
do buen jugador de ajedrez. 


ESTRUCTURA DEL PROGRAMA 


Un programa de ajedrez para ordenador 
adopta básicamente la estructura del organi¬ 
grama de la figura 9. Tras una primera fase 
en la que los movimientos son «de libro» por 
ambas partes, el programa comienza a gene¬ 


rar posiciones terminales a profundidad pre¬ 
fijada, desde la posición raíz alcanzada en ese 
instante. La función evaluadora F suministra 
la puntuación de la posición terminal exami¬ 
nada a la estrategia de búsqueda, la cual va 
«modificando su opinión» sobre el movimien¬ 
to a adoptar a medida que considera las su¬ 
cesivas posiciones terminales. Es la propia es¬ 
trategia, dotada normalmente de algún algo¬ 
ritmo de «poda», la que gobierna el salto a 
la siguiente posición terminal a evaluar (sim¬ 
bolizada por «n» en el organigrama). 

Finalizada la búsqueda y presentado el mo¬ 
vimiento efectuado por elprograma, caben 
dos posibilidades: 

a. Que el programa se limite a esperar el 
movimiento del contrincante (versión 4a). 

b) Que el programa aproveche el tiempo 
de reflexión del contrincante para profundi¬ 
zar su análisis con vistas al movimiento siguien¬ 
te (versión 4b). 

Esta última posibilidad es sumamente inte¬ 
resante, ya que manteniendo el mismo tiem¬ 
po medio de respuesta del programa, la pro¬ 
fundidad efectiva de análisis puede ser supe¬ 
rior. El programa, una vez generado su mo¬ 
vimiento, supone que la respuesta del contrin¬ 
cante es la que corresponde, lógicamente, a 
la variante principal y toma como nueva po¬ 
sición raíz, la resultante después de la jugada 
completa. (En el ejemplo de la figura 7, una 
vez decidido MI por conducir a la posición ter¬ 


minal P1231, supone que la respuesta será' 
M12 y toma como nueva posición raíz la M12). 
A partir de ella, y mientras no sea interrumpi¬ 
do por la entrada del movimiento del contrin¬ 
cante, lanza una nueva búsqueda anticipada, 
que puede llegar a ser incluso de profundidad 
superior si el tiempo lo permite. Si la respuesta 
real del contrincante no es la prevista, el pro¬ 
grama desecha simplemente los cálculos efec¬ 
tuados y se enfrenta a la posición verdadera. 

En la práctica, si el programa está bien di¬ 
señado, la respuesta del contrincante será la 
prevista en un porcentaje mayoritario de las 
jugadas. Llamando «m» a este porcentaje, 
podemos escribir: 

T—T p +mT c 

donde: 

T r =tiempo medio efectivo de reflexión dis¬ 
ponible para el programa. 

T p =tiempo medio de respuesta del progra¬ 
ma. 

T c =tiempo medio de respuesta del contrin¬ 
cante. 

(T p y T c son los tiempos que «tarda» en emitir 
su movimiento el programa y su contrincan¬ 
te, respectivamente, tras el movimiento del 
otro). 

Dado que T r + T p , es obvio que con un tiem¬ 
po de respuesta T p podemos conseguir una 
profundidad de búsqueda mayor que la que 
aparentemente sería posible, pues en realidad 
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disponemos de un tiempo T r . (Está claro que 
en la versión 4a, T r =T p ). 

Es precisamente el tiempo de reflexión T r el 
que determina en última instancia la fuerza de 
juego del programa, una vez optimizadas las 
funciones evaluadoras y las estrategias de bús¬ 
queda y, de hecho, es el parámetro sobre el 
que actúa la selección de nivel de juego en los 
programas. 



FIGURA 9 

ESTRUCTURA DEL PROGRAMA 



CONCLUSION 


La realización de un programa de ajedrez, 
como esperábamos haya quedado patente a 
lo largo de estos artículos, es una tarea a la 
vez titánica y atrayente. Es titánica porque el 
número de rutinas diversas a desarrollar, al¬ 
gunas de ellas bastante complejas, es muy ele¬ 
vado. Y es atrayente porque la «criatura» 
simula algunos de los más interesantes proce¬ 
sos de la mente humana (muchos de los con¬ 
ceptos involucrados en su creación forman 
parte de los sistemas aplicados en inteligen¬ 
cia artificial, como el método minimax y el al¬ 
goritmo alfa-beta) y su complejidad supone un 
reto para el programador. 

Si alguno de nuestros lectores se siente con 
fuerzas suficientes para afrontar la realización 
de un programa de ajedrez, le haremos las su¬ 
gerencias siguientes: 

a. El programa debe ser lo más modular 
posible. Dada su extrema complejidad, es pre¬ 
ciso facilitar las correcciones y los cambios. 

b. A pesar de su lentitud, resulta de gran 
ayuda el realizar una versión previa, aunque 
sea parcial (una especie de maqueta), en Basic. 

c. No conviene afrontar directamente una 
función de evaluación que incluya todas las 


parciales descritas. El programa funcionará 
aceptablemente con sólo incluir material, mo¬ 
vilidad y ataque al rey, por ejemplo. 

d. El valor relativo de los coeficientes k de 
ponderación es extremadamente importante y 
deberá ser determinado experimentalmente; 
como orientación, ki suele valer de 8 a 12 veces 
más que cualquiera de los demás coeficientes. 

e. Aunque el programa resulte un tanto es¬ 
túpido, no es mala ¡dea empezar con una es¬ 
trategia tipo A a profundidad 2, con minimax 
y sin algoritmo de intercambio. 

f. Al principio, habrá que conformarse con 
que el programa juegue rematadamente mal 
los finales (de hecho, es casi milagroso que en 
algún momento llegue a jugarlos verdadera¬ 
mente bien). 

Finalmente, para los que deseen profundi¬ 
zar sobre el tema, recomendamos excelentes 
libros: 

—«Manual de ajedrez por compu¬ 
tadora», de David Levy. 

Editorial Mitre. Barcelona, 1986. 

«Ajedrez y computadoras», de L. 

Pachman y V. I. Kühnmund. 

Ediciones Martínez Roca. (Colección ESCA¬ 
QUES). Barcelona, 1982. 
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EL MUNDO 
DE LOS JUEGOS 



El mundo del software de juegos para Amstrad es más rico y complejo 
cada día que pasa. La cantidad de títulos, si los pusiésemos todos 
juntos, alcanzaría una altitud realmente sorprendente. Además, la 
gente que compra juegos padece una «obsesión» de las más lógicas del 
mundo: les gustaría conocerlos a fondo, recorrerlos hasta el final y, si 
son demasiado difíciles, encontrar una pequeña ayuda en alguna 
parte que les permita enterarse de la totalidad del juego en un tiempo 

razonable. 

Más de un lector se estará imaginando a dónde queremos llegar: a los 
programas cargadores que permiten a los poseedores de una copia 
legal de un juego hacer maravillas en él. 

En efecto, de eso se trata. Os presentamos 10 cargadores completos 
para que disfrutéis a tope de vuestros programas favoritos. 
Quisiéramos dar las gracias a nuestra revista hermana, Micromanía, 
por proporcionarnos todo tipo de asistencia y ayuda en un campo de 
la informática en el que son, sin discusión, los primeros expertos. 









GYROSCOPE 

Estamos frente a uno de los jue¬ 
gos más difíciles y originales que 
hemos visto nunca: el arte de con¬ 
ducir un mecanismo giroscópico, 
alias peonza, por los intrincados 
paisajes de un laberinto tridimen¬ 
sional, frío y desierto como él solo, 
no es fácil de dominar, y justifica 
plenamente la inclusión de un car¬ 
gador completo, cuyos secretos no 
vamos a descubrir por aquello de 
no aguar la fiesta a los fieles segui¬ 
dores de la Orden del Joystick. Vi¬ 
das infinitas, enemigos inocuos y 
mucho más os esperan detrás de 
unas pocas líneas de programa. 


10 REM CARGADOR PARA GYROSCOPE 
20 MEMORY 439AE:MODE 1 
30 FOR F= &5000 TO 45032:READ A:POK 
E F,A:NEXT 

40 INPUT "VIDAS INFINITAS <S/N>";A* 
:IF AS="N" OR A*="n" THEN POKE 4502 
2,435 

50 INPUT "JUEGO HAS FACIL <S/N)";AS 
:IF AS="N" OR AS="n" THEN POKE 4502 
7, 43A 

60 INPUT "TIEMPO INFINITO <S/N)";A$ 
:IF A$="N" OR A$="n" THEN POKE 4502 
C,43A w ¿ l / '\ 

70 CLS:LOCATE 12.12:PRINT"INSERTA E 
L ORIGINAL":LOAD"!" 

80 POKE 439E2,4C3:POKE 439E3,49:P0K 

E 439E4,450:CALL 45000 

100 DATA 33,255,171.17,64,0,195 

110 DATA 175,57,62,63,50,43,2 

120 DATA 62,76,50,44,2,33,33 

130 DATA 80.17,0,7.1,18,0 

140 DATA 237,176.243.241,201,62,0 

150 DATA 50,43,83,62,201,50,132 

160 DATA 83,62.201,50,130,85,195,16 

, 79 
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STREET HAWK 

sBSSSSffi 

con ca, ¡JÍ e - aCul ares carreras a 

Sus e ^P ecTa pnemiqos male- 
tumba abierta través 

ticos, sus mere, ble saltos^ 

de todo tipo de frontal, 

todo está^rasente en un rnagníS- 


v logar con él sin lo oyodo de : 
í,o programa cargadar paede re 
cuitar harto frustante. 

“teto.s.goroga.agra^cer» 


ror eso, seyu.^ m-=> 

el turbo infinito y los cohetes pro 
pulsares también infinitos. 

P Ahora a teclear, aprieta los pu 


ños y. 


¡VIVA LA TRAVESURA! 
AYUDEMOS A JACK 
THE NIPPER 

Porque, ¿quién no ha tenido ga¬ 
nas de tirar de la cola a un perro, 
arrojar objetos a la gente o poner¬ 
se a tirar petardos por |a calle? 
Pues, seguramente toda la gente 
«adulta». 

Y como las frustraciones son ma¬ 
las de guardar, con Jack the Nip- 
per tendremos la oportunidad de 
vivir todas las cosas que siempre 
quisimos hacer, pero que nunca nos 
dejaron. 

Pero como esto cansa, si no que 
se lo digan a los «babyes» cuando 
caen en la cama, aquí tenemos una 
ración de fuertes medicinas. Lea, 
lea... 
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10 REM Jack the Nipper 
20 REM 

30 REM por A.C.L. 

40 REM 

50 LOAD"!NIPPER":POKE &A058,0:POKE 
&A059,&A5 

60 FOR I=&A500 TO &A50A:READ A:POKE 
I, A: NEXT 
70 CALL &A000 

80 DATA &3E,0,&32,&FF,&39,&32,&00,& 
3A,&C3,401.&10 



STAINLES STEEL 

Con este curioso nombre, 
igual a la frase que insertada en 
la tapa posterior de muchos re¬ 
lojes, se nos presentó hace tiem¬ 
po un ceñudo muchacho. Stain 
tenía pinta de duro, bueno, de 
punk duro. Más tarde descubrí que no sólo tenía la pinta de duro. Stain 
era un punk como los de antes, no como ésos que se conforman con lle¬ 
var extraña pelambrera y beber a todas horas en la calle. A Stain se le 
podía mirar fijo, se enfadaba. A Stain era mejor dejarle solo. 

Por eso cuando los androides invadieron la Tierra se molestó mucho. 
Pero no fue debido a que fueran a destruir la raza, 
qué va, se molestó porque 
no podía circular a toda ve¬ 
locidad por las autopistas que 
era lo que a él le gustaba. 

Mal, muy mal lo van a pasar 
los androides. 


10 MEMORY 43FFF:LOAD"!",&4000 
20 MODE 2: INPUP'Vidns Infinitos CS/ 
H> : ",ni:ni=UPPERi(aÍ):IF oi="S" T 
HEN POKE 0,1 ELSE IF nl="N" THES PO 
KE 0,0 ELSE 20 
30 POKE 1,0 

40 IBPUP’Fnse iniciol (0/1/2/3) : " 
,a:IF o>3 THBN 40 ELSE IF o<0 THES 
40 

50 fa=a 

60 POKE &4084, &40: POKE &4085, 0: subf 
0:FOR i=&40 TO 112:READ a*:a$="&"+a 
S; POKE 1. VAL(aS) : sum=suin+PEEK < 1) : NE 
XT 

70 MODE 1:POKE &69,fasCALL &4000 
80 DATA 3A,0,0,B7.28.A.AF.32,F3,6,3 
2, F4,6,32,F5,6,3A,1,0,B7,28,4,AF,32 
,79,4,3E,CD,32,7D,14,21,68,0,22,7E, 
14, C3, 16, 1,3E,fa,32,E8,BF.C9.C3,16, 
1 
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POR SIEMPM BOWBJWK 
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^Ved, ved, lo tórtolo mágico, 

No 'jv 
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RASPUTIN 

Con estos pokes de escudos y es¬ 
padas infinitas y energía inagota¬ 
ble podrás vencer al malvado Ras- 
putín y apoderarte de la Joya de 
los Siete Planetas. Esta joya es la 


fuente de su inmenso poder y, pa¬ 
ra evitar que alguien se la quite, la 
ha protegido mediante los ocho 
conjuros más fuertes que conoce en 
el mundo atemporal e ilocalizable 


de los Siete Planetas. Suponemos 
que te serán muy útiles y lograrás 
tu objetivo, de no ser así la furia de 
sus monstruos dará cuenta de ti. 


10 HODE 1:BORDER 2: INK 0,0: INK 1,26 
:INK 2.2:INK 3,6 

20 VINDOW #1,14,26,5,5:VINDOV #2,14 
.26,7,7 

30 MEMORY S1FFF:LOAD"rascode",SA400 
40 PRINT" INSERTA EL ORIGINA 

L" 

50 LOAD"!rasputinl":a=&1681 

60 POKE a,&C3:POKE a+l,0:POKE a+2,& 

A4 

70 INPUT"espadas y escudos inagotab 
les";at:IF UPPERt<a$>»"N" THEN POKE 
&A462,&39 

80 INPUT"energla infinita";a$:IF UP 
PERS<at)="N" THEN POKE &A43A.&C 
90 CLS 

100 CALL &1600 

































LAS TRES LUCES 
DE GLAURUNG 

Tiempo atrás, los jóvenes se ga¬ 
naban la gloria matando a pérfidos 
magos, malvados caballeros, o res¬ 
catando a princesas prisioneras de 
pérfidos señores. 

Nuestro rústico protagonista se quiso ganar unos dineros y un nombre 
a costa de salvar al mago del señor de la región. 

Y para cumplir adecuadamente con esta misión, no hay nada como 
tomársela con calma. 

Nosotros recomendaríamos la siguiente receta. 

Nueve partes de vidas infinitas y una parte de flechas inagotables. Más 
o menos así: 



DISCO: 

10 OPENOUT"a" 

20 MEMORY 999:MODE 1:BOEDER 0:INK 0 
, 0:INK 1,25:INK 2, 10: INK 3,15 
30 ON ERROR GOTO 50 

50 LOAD”glaurung.bin":POKE 42138,20 
1 

60 LOCATE 1,20: INPUT"VIDAS INFINITA 
S (s/n)",a$:IF aS="s" THEN POKE &85 
BF,0:POKE &85C0,0 

70 LOCATE 1,20: INPUT"FLECHAS INF INI 
TAS Cs/n)",a$:IF a$="s" THEN POKE & 
9029,0 

80 CALL 41162 


CINTA: 

10 OPENOUT"a” 

20 MEMORY 1000:MODE 1:BORDER 0:INK 
0.0:INK 1,25:INK 2,10:INK 3,15:PRIN 
T"INTRODUCE LA CINTA ORIGINAL" 

30 ON ERROR GOTO 50 
40 LOAD" »'• ,0 

50 LOAD"!":POKE 42138,201:CALL 4210 
0 

60 LOCATE 1,20:INPUT"VIDAS INFINITA 
S (s/n)",a$:IF aS="s" THEN POKE &85 
BF,0:POKE &85C0,0 

70 LOCATE 1,20: INPUT"FLECHAS INF INI 
TAS (s/n)",a$:IF a$="s" THEN POKE & 
9029,0 

80 CALL 41162 



Batman debe reunirlas y montar el 

C °Loque está claro es que su ene¬ 
migoha escondido el coche en so- 
láscenos de peligros Y trampas,_po 
lo que Batman tendrá que luchar 

dU íero ahora que puedes exudar¬ 
le, no dudamos que lograra cumplir 
su misión. 


batman 

Aquí tenéis un cargador para el 
Batman, superhombre dotado do 
sentidos de murciélago, que en « 
ta ocasión se va a enfre 
cuelo y diabólico Arlequín quede ha 
robado el Baticar, su espec.al.simo 

“Arfaqotn lo escondió ense coeva 
pero despiezado en siete partes. 


ME ™3?P$ra A *39K D 'o:POKB 8. 

&A000 TO &A0AC:REA 

:VAL<AS):check=chec 

cbeckO18625 T 
datas" „ 

infinitas 

nií B SO"S" AND a* 
ELSE IF ai="S" THEI1 F 

¿A^AcAR montado : 

- ) • if aSO"S" AND 
ELSE IF a*="S" THEI 


10 MODE 1 
: POKE 8.39E4 

39E6.SA0 

20 RESTORE: FOR I- 
D AS: AS="&"+A*:A_ p 
k+a:POKE I,A:NEXT.IF 
HEN PRINT "error 
40 MODE 2:INPUT"Vidas 

nS-aS=UFPER*<aS>: l : 

<>"N" THEN 40 E_— 
OKE 0.1 C.tX-á, 

50 INPUT”Tener el 

» aS:aS=UFFERS<aS> 

a$<>" N" THEN 50 E— 
POKE 1.1 
60 CALL &39AF 
70 DATA CD.4B,A0,6, 

E,3D,28,3,5,18,F5,5 

D,2E,A0,21 

I 11 , 64 ^ 0, Ed', 53*, Ec', BC 

I 90'dATA 3 33,21.46,B1 
I ,3E,9A.ED.4F,ED,5F 

I B, 3B, E8,21.5E, A0 . E 

I 1,0,BB,1.F2.1 
I 100 DATA 3 E. 8 B.ED, 

| ,A0,E0,3B,3B.E8,3A 

I É,99,32,ES 
I 110 DATA 1C,DD,21, 
I DD,77, 1, DD,77,2.3/ 
I AF DD.21 

■ 120 DATA Eó.lA.DD, 

I 7 2, DD, 21.21,34 , D. 

■ 77 2.3E.7F.32.B3,: 

































CARATULAS PARA SUS DISCOS 

Para que guarde sus mejores programas de los, hasta ahora, cuatro especiales 
aparecidos, aquí tiene 4 carátulas para sus discos. 
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Avenger 

Después de recorrer el Camino del Tigre y lograr hacerte un 
honorable ninja, deberás vencer al Gran Guardián, principal 
tirano y opresor del pueblo, para robarle todos los tesoros que 
ha conseguido almacenar en su fortaleza, a costa del hambre 

de todos sus súbditos. 

Pero cuidado, la fortaleza de tan terrible señor está guardada 
por temibles guerreros, además de odiosas y mágicas bestias. 


& 

nos presenta 

la teórica segunda parte de 
The Way of the Tiger. Y 
decimos la teórica, porque 
no entendemos cómo los 
hombres de Gremlin, 
definen así el Avenger en la 
carátula del juego. 

Nos extraña el hecho de 
que juegos tan diferentes en 
planteamiento se quieran 
relacionar. 

Por una parte tenemos 
que The Way of the Tiger, 
un excelente juego, está 
basado en una buena 
representación de combates 
de artes marciales que 
podremos llevar a cabo con 
nuestro ninja. 

Por otro lado, el Avenger, 
que también es un buen 
juego, tiene el planteamiento 
más o menos clásico del 
juego de «recolección» de 
objetos. 

La verdad, es que 
nosotros pensamos que la 
única relación que une a 
estos dos juegos es el 
nombre del ninja, Avenger. 

Después de estas 
consideraciones, pasemos a 
jugar. 

En el inicio del juego, nos 
encontramos en los jardines 
del palacio, que, como todo 
buen jardín oriental, posee 



un tupido césped además de 
un típico arroyo cruzado por 
dos puentes. 

A partir de aquí, desde los 
jardines, deberemos ir 
buscando las llaves que nos 


abran las puertas de las 
otras dependencias del 
castillo. 

¿Y qué hay en las 
dependencias del castillo? 
Pues, evidentemente, los 
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tesoros que tendremos que 
recoger para, como si de un 
Luis Candelas oriental se 
tratara, repartir entre los 
pobres. 

Más, como a nadie le 
gusta que le roben el 
dinero, aunque a su vez él 
lo haya robado, ha 
colocado el amo y señor de 
palacio, todo tipo de fieros 
guerreros dispuestos a 
incordiar. Si a esto le 
añadimos algunas cobras y 
una especie de extraños 
insectos, que parecen 
mariquitas azules, tendremos 
un buen montón de motivos 
para no aburrirnos en tan 
encomiable misión. 

Para ver el estado de 
salud en que se encuentra 
Avenger, disponemos en 
pantalla de unos curiosos 
indicadores. 

Son dos esferas rodeadas 
de puntitos luminosos, 16 
exactamente, que en la 
superior van desapareciendo 
con mayor o menor rapidez 
según la dureza del 
combate. Si el combate 
fuera muy duro, 
desaparecerían todos y en 
la esfera inferior 
perderíamos uno. Cuando 
en la esfera inferior sólo 
queden dos o tres puntos, 


será cuestión de ir 
planteándose la necesidad 
de pulsar la tecla 
perteneciente al número dos 
del teclado alfanumérico, si 
hacemos esto, nuestra 
energía se recargará y 
podremos seguir nuestra 
misión; si no, nuestras 


correrías están próximas a 
su fin. 

Pero esta petición de 
energía vital a los cielos, 
sólo la podremos realizar en 
dos ocasiones. Si infringimos 
esto, nos saldrá en pantalla 


el mensaje de que los dioses 
se han enfurecido por 
nuestras llamadas y 
caeremos entre agónicos 
estertores muertos al suelo. 
Luego vendrá el eterno 
sufrimiento en el infierno. 

Además de los indicadores 
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jardín, deberemos 
enfrentarnos a 
guardianes con nunchakus, 
karatecas, extraños seres, 
bichos, etc. 

Y, aunque algunos son 
más difíciles de matar que 
otros, deberemos acabar 
con ellos a la máxima 
velocidad posible para que 
no nos resten mucha energía 
vital. 

Un sistema rápido de 
hacer esto, es dispararles los 
shuriken con los que 
contamos que son 10. 
Cuando se nos gasten, 
habrá que ir dando patadas 
hasta que encontremos una 
caja que al tocarla nos 
concede 10 shuriken más. 

Pero para no gastar ni 
energía vital ni shuriken, 
recomendaríamos también el 
evitar enfrentamientos 
innecesarios. 

Otra cosa que dificulta 
nuestro movimiento, es una 
especie de cuchillos que 
emergen del suelo de las 
habitaciones, hay que 
procurar esquivarlos para 
no sufrir retrasos. 

Desde la sala anterior 


deberemos dirigirnos a la 
que está inmediatamente 
debajo en la pantalla, allí 
recogeremos un tesoro, 
después abriremos una 
puerta y, girando a la 
izquierda, seguiremos por 
un corredor hasta el final. 
Allí abriremos una puerta y 
comenzaremos a reconocer 
las salas. Veremos una sala 


vitales, tenemos 
también otros que 
nos indican las 
llaves que 
llevamos, los 
tesoros que 
tenemos, los 
shuriken que nos 
quedan, y los 
objetos recogidos. 

Una vez que 
sabemos cómo 
controlar nuestra 
situación, pasemos 
a la aventura. 

Para no perder 
tiempo, 
deberemos ir 
hacia la parte 
inferior izquierda 
del jardín. Allí 
cogeremos la 
llave y el tesoro 
que veremos, sólo 
hay que tocarlos, 
y a toda 
velocidad, cosa 
nada difícil 
teniendo en 


cuenta que 
Avenger más que 
correr vuela, nos 
dirigiremos hacia 
la puerta de la 
dependencia que 
se halla en la 
zona más alta del 
jardín, 
Iaabriremos, 
teniendo la llave 
sólo hay que 
tocar la puerta y 
después de entrar 
recogeremos la 
llave que hay en 
la dependencia. 
Esta llave nos 
consigue 
automáticamente 
otras cinco en el 
marcador. 

¿Parece 
fácil? Pues, no lo 
es tanto. 

Mientras vamos 
recorriendo el 
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pequeña custodiada por un 
guerrero, nos le quitaremos 
de enmedio y recogeremos 
la llave que hay allí. Esto 
nos conseguirá tres llaves 
más. 

Después, una vez que 
hayamos salido de nuevo al 
corredor, ¡remos hasta 
donde se cruza a la derecha 
con otro pasillo, pasamos a 
la primera sala de la 
derecha, batallamos con una 
«mariquita» y atravesamos 
una puerta, giramos a la 
izquierda y seguimos un 
corredor hasta que se cruza 
con otro, giramos a la 
izquierda, entramos por otro 
corredor —¡vaya lío, eh!—, 
lo seguimos hasta el final y 



entramos en una sala de 
suelo de madera, cruzamos 
una puerta y nos peleamos 
bravamente con un 
guerrero, lo derrotamos y, 
joh, maravilla!, vemos un 
objeto en el suelo, le 
recogemos con trémulas 
manos y un mensaje nos 




dice que es un anillo que 
nos hará inmunes, eso sí, 
sólo por un momento. Locos 
de alegría, cruzamos la 
puerta que nos lleva a otra 
sala donde una necia 
mariquita nos ataca, gracias 
a nuestro anillo la vencemos 
sin despeinarnos y 
recogemos la preciada llave 
que está en el suelo. 

Después..., bueno, la 
verdad es que no nos 
gustaría poneros las cosas 
excesivamente fáciles ni 
tampoco querríamos 
cansaros, por lo que 
pensamos que os dejaremos 
a vosotros la continuación. 

Sólo os diremos que 
tendréis que bajar por una 
trampilla, la veréis en una 
sala de suelo de madera, y 
daros unas vueltas 
reconociendo la parte baja 



del palacio en donde 
tendréis que seguir 
cogiendo llaves y 
tesoros. 

Bien, llegó la hora 
de las conclusiones y, 
la verdad sea dicha, 
éstas son positivas. 

Sin que la trama sea 
nada espectacular es 
entretenida, 
consiguiendo el 
laberinto de 
corredores y 
habitaciones 
mantenernos 
abstraídos en la 
búsqueda de llaves y 
tesoros. 

Los enemigos son 
bastante fáciles de 
eliminar, pero 
cuidado, no hay que 
olvidar que algunos 
quitan bastante 
energía. 

Hemos dejado para 
el final lo realmente 
destacable de este 
juego. Avenger, el 
protagonista, se mueve 
a velocidad de 
vértigo. Si, de verdad, 
se mueve como alma 
que lleva el diablo. 
Después de dirigir un 
rato a Avenger, se 
contagia su velocidad 
y vamos circulando 
como las «motos». 

Poco más que decir, 
si no es que nos ha 
parecido muy 
entretenido el Avenger 
de Gremlins Graphics, 
que está distribuido 
por Erbe y que, sin 
duda alguna, será un 
juego que nos haga 
pasar buenos ratos en 
el ordenador. 
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FORTH TE INVITA A JUGAR 


Seguramente, bastantes de nuestros lectores, ya están un 
poco más convencidos de que el ordenador que tenemos 
instalado en casa (no almacenado) es algo más que un «juguete», 
destinado a ser utilizado para cargar en su memoria un buen 
programa de juegos y hacernos disfrutar de lo lindo con este 
simulacro cíe aventuras que ocurre en la pantalla. 
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personas se encuentran algunas (cada vez 
más, por cierto) que han comprobado por sí 
mismos que el lenguaje Basic no es el único uti- 
lizable para comunicarnos con nuestro queri¬ 
do Amstrad, sino que existe una gran va¬ 
riedad de formas y maneras de hacerlo. Es¬ 
tamos en lo cierto, ¿verdad? 

Este es el motivo que nos ha movido a con¬ 
tinuar adentrándonos en el mundo de los len¬ 
guajes de programación ya que, además, nos 
parece que estamos ante una aplicación de 
nuestro ordenador casero que se sale de la clá¬ 
sica codificación de un programa en el lengua¬ 
je típico que casi todos ellos llevan incorpora¬ 
do: Basic. 

El resultado de nuestros sondeos nos indicó 
que, sin miedo a equivocarnos, podíamos in¬ 
tentar ofrecer la posibilidad de poder traba¬ 
jar con uno de ellos que, en principio por su 
forma de trabajo y por la propia concepción 
del lenguaje, nos resulta atractivo «a tope». 
Y aquí es donde nos «aliamos» con el Forth. 

Imaginamos que no habrá olvidado toda¬ 
vía el concepto de «stack» o «Notación 
Polaca Invertida», por ejemplo, que les 
ofrecimos en el anterior número especial de 
esta revista. Vamos a estar utilizándolos casi 
continuamente, así que si todavía no tiene una 
¡dea clara de qué es cada una de estas cosas, 
para qué sirven y cómo se utilizan, le roga¬ 
mos que eche un vistazo a todo lo que ya he¬ 
mos publicado sobre ellas. 

Como no podemos estarnos parados, le pro¬ 
ponemos que esta vez avancemos un poco 
más en el tema, pero ahora que ya tenemos 
una cierta base teórica sobre el lenguaje y co¬ 
nocemos alguna de sus instrucciones o «pa¬ 
labras» ya definidas, lo haremos de una for¬ 
ma mucho más práctica, viendo que todas 
ellas pueden utilizarse para realizar «cosas» 
que sirvan para algo, pues su misión es bas¬ 
tante más amplia que repetir una cierta frase 
doce veces, por ejemplo. ¿O no? 

¡Manos a la obra! Lo primero será proyec¬ 
tar detenidamente «qué» es lo que queremos 
hacer, ¿de acuerdo? 

Nuestro objetivo va a ser muy sencillo. In¬ 
tentaremos conseguir un programa para que 
el ordenador juegue con nosotros. No se tra¬ 
tará de «algo» difícil y complicado, sino de 
un mero entretenimiento que nos agudiza el 
ingenio y repetirá una vez más el enfrenta¬ 
miento amistoso entre el «hombre» y la 
«máquina». ¡Suerte! 

Partimos de que encima de la mesa de jue¬ 
go hay 20 monedas, o cualquier otro número 
que nosotros elijamos. El primer jugador reti¬ 
rará de ella y a su criterio 1, 2, 3 ó 4 dejando 
el resto sobre la mesa. 

El siguiente hará la misma operación con las 


que hayan quedado disponibles y el turno pa¬ 
sará, de nuevo, al jugador que inició la parti¬ 
da. 

¿Hasta cuándo durará? La solución a 
esta pregunta es bien sencilla: si no hay mo¬ 
nedas que retirar, se acabó lo que se daba. 
O más claramente diremos que el jugador que 
recoja la última moneda habrá ganado la par¬ 
tida dejando a su oponente a la altura del be¬ 
tún. (Sugerimos darle la revancha para que 
después no haya quejas ni disculpas). 

Pero nuestro contrincante será duro de pe¬ 
lar ya que vamos a enfrentarnos con nuestro 
Amstrad y damos fe que posee una rapidez 
de reflejos digna de envidia. Así que, ¡cuida¬ 
do! 

¿Se atreve a realizarlo completa¬ 
mente en lenguaje Forth? Nosostros sí, 
de modo que le invitamos a acompañarnos en 
la empresa. ¿Entiende claramente «qué» pre¬ 
tendemos hacer? Seguro que sí. 

Ahora nuestro problema será cómo hacer¬ 
lo. La solución buscada podría conseguirse de 
la siguiente forma: 

El programa tendrá que explicar primero en 
qué consiste el juego ya que aunque nosotros, 
sus autores, sabemos cómo funciona, un po¬ 
sible competidor seguro que no tiene ni idea 
de cómo empezar. 

A continuación nos presentará en la panta¬ 
lla la oportunidad de elegir quién comenzará 
a coger las monedas. Si no estamos dispues¬ 
tos a dar el primer paso y le contestamos que 
no, seguro que el Amstrad está presto a em¬ 
pezar y realizará la primera jugada. 

¿Ya sabemos quién comienza?, pues a pen¬ 
sar y calibrar para ver si logramos que no nos 
venza: entramos en la fase de «juego» propia¬ 
mente dicho. 

Supongamos que la competición se ha de¬ 
sarrollado sin ninguna incidencia ajena a las 
normas del juego y que la partida ya tiene ga¬ 
nador. ¿Qué hacer ahora? El ordenador 
informará del resultado y vuelta a empezar. 

Siguiendo este proceso no encontrará nigu- 


(. COMIENZO) 




INFORMACION 



SALIDA 



JUEGO 



FIN 
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na dificultad si desea plasmarlo gráficamente 
en un organigrama. Si no es así, observe la 
Figura I que le aclarará sus dudas. 

Todos sabemos o, por lo menos, debíamos, 
que el lenguaje Forth enriquece su vocabula¬ 
rio básico añadiéndole las «palabras» que 
nosotros mismos vamos definiendo basadas en 
las ya existentes. ¿Que por qué le deci¬ 
mos esto? Vaya pensando en crear alguna 
nueva que cumpla con cada una de las fun¬ 
ciones que hemos numerado anteriormente. 
Las llamaremos «INFORMACION», «SA¬ 
LIDA», «JUGAR» y «FIN » por similitud 
con cada uno de los procesos indicados en el 
organigrama. 

Si le seguimos al pie de la letra traducién¬ 
dolo a «palabras» Forth conseguiremos de¬ 
finir la primera de las que está compuesto el 
programa. Prepare su intérprete Forth y ¡ade¬ 
lante! Teclee: 


PROGRAMA I 

: MONEDAS INFORMACION SALIDA JUEGO 
FIN ; 


y a continuación pulse la tecla RETURN. 

¡Qué sorpresa! En lugar de encontrarnos 
con la definición de una nueva palabra, a la 
que hemos querido dar el nombre de «MO¬ 
NEDAS», resulta que hemos obtenido un 
mensaje de error: 

INFORMACION-Palabra no permitida 

Claro, ¡cómo va a permitirnos el «intér¬ 
prete» utilizar una «palabra» INFORMA¬ 
CION) que todavía no está definida y que, por 
tanto, no está disponible en el «diccionario»! 
Y podemos hacer extensivo esto a las demás: 
ninguna de ellas lo está, así que nuestro si¬ 
guiente paso será decidir el modo de resolver 
cada uno de los gráficos de proceso (rectán¬ 
gulos) del organigrama que han dado lugar 
a estas «palabras». No abandone el lista¬ 
do del Programa I ya que más tarde tendrá 
que volver a utilizarlo. 

¿Qué es lo que tenemos pensado que haga 
la palabra «INFORMACION»? Tiene una 
misión realmente sencilla: contar al posible ju¬ 
gador las normas por las que se regirá la par¬ 
tida. En Basic sería muy sencillo fabricarnos 
una rutina que a base de instrucciones PRINT 
nos explique el juego. ¿Y en Forth? No se 
preocupe, también es muy simple. Si no se lo 
cree, eche un vistazo al Programa II. 


PROGRAMA II 

: INFORMACION 8 CL6 6 SPACES MANOS 
A JUGAR CON NUESTRO ORDENADOR. DISPO 
NENOS DE 28 MONEDAS Y CADA 1 CR 15 
SPACES .■ JUGADOR 1IM COGIENDO 1, 2, 

3 0 4 A SU ELECCION/ CR CR 15 SPACES 
/ GANARA EL QUE CONSIGA LLEVARSE LA 
ULTIMA MIHEDA/ CR ; 
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No les mentíamos, ¿verdad? No emplea nin¬ 
guna «palabra» fuera de las ya existentes en 
el repertorio básico del intérprete que estamos 
utilizando, así que dispóngase a definir la pa¬ 
labra «INFORMACION» a base de todas 
las que ya están. En esta ocasión no encon¬ 
trará ningún obstáculo que se lo impida. 

¿Novedades? Aparentemente ninguna. 
Siguiendo el listado vemos que primero «me¬ 
te» un cero en el «stock» y luego borra la pan¬ 
talla de gráficos con la palabra «CLG» y la 
tinta que contenga la posición más alta del 
stack: en este caso un cero. 

A continuación y empleando." (equivalente 
al PRINTpara textos), visualiza las líneas del 
mensaje. La palabra encargada de saltar lí¬ 
nea es CR y SPACES tomará el valor que se 
encuentre en ese momento en el tope del stack 
e imprimirá tantos espacios como le indique 
dicho valor. ¿Quiere ver los resultados 
producidos por INFORMACION? Te 
dee entonces, simplemente: 

INFORMACION 

y al instante podremos comprobar si lo que 
aparece en la pantalla es lo que pensábamos 
tras analizar la definición de la palabra. ¿Có¬ 
mo queda el stack tras ejecutarla? 

Veamos despacito este punto. 

Primero introducimos en él un cero que des¬ 
pués extraemos en CLG. Después metemos un 
6 que sacamos con SPACES, imprimimos un 
texto y saltamos de línea (estas dos palabras 
no manipulan el stack). A continuación pone¬ 
mos un 15 para imprimir una serie de espa¬ 
cios en blanco, con lo que la pila vuelve a que¬ 
dar vacía. 

Si seguimos analizando la palabra INFOR¬ 
MACION veremos que al final el stack queda 
vacío ya que en él se introducen tantos valo¬ 
res como después se sacan. Compruébelo te¬ 
cleando y le aparecerá un mensaje de 
error que le indica esta circunstancia. ¿Pode¬ 
mos dar como válida esta definición de pala¬ 
bra? En confianza, creemos que sí. 

Continuemos. «SALIDA» tendrá que cum¬ 
plir dos funciones: preguntarnos si queremos 
ser los primeros en jugar o no y guardar en 
el stack un indicativo de uno u otro jugador. 
Hemos decidido, por decreto, que después de 
ejecutarse esta palabra el elemento superior 
de la pila contenga un 1 si somos nosotros los 
que comenzamos el juego y un 0 en el caso 
que sea el ordenador. Su diagrama de flujo 
se corresponderá con el de la Figura II. ¿In¬ 
tenta codificarla en Forth? Ande, vaya 
al Programa III y vea cómo lo hemos hecno 
nosotros. 

Empleamos una nueva «palabra» del reper¬ 
torio básico: «KEY», que mete en el tope del 


PROGRAMA III 

: SALIDA CR 25 SPACES SALES TU PRI 
MERO? (S/N)' CR KEY DUP 83 = SUAP 11 
5 = OR IF 1 ELSE 8 THEN ; 


stack el código Ascii del carácter que se co¬ 
rresponda con la tecla que pulsemos. 

Luego duplicamos este valor ya que son dos 
las comparaciones que vamos a realizar 
(DUP). Veamos si es igual a 83 (carácter5) por 
medio de: 

83= 

que deja en el stack un valor de «verdadero» 
o «falso» según haya ido la comparación a la 
vez que extrae del mismo los dos valores que 
hemos comparado. 

Situación actual del stack tras la valoración 
de la condición: valor de la tecla en la zona 
baja y justo encima el resultado booleano de 
la comparación. Luego si queremos compro¬ 
bar la posibilidad de que la tecla pulsada sea 
la «s» tendremos que intercambiar estos dos 
valores superiores para volver a colocar de 
nuevo el código de la tecla pulsada en el ele¬ 
mento superior. Po eso es por lo que emplea¬ 
mos la palabra SWAP y 

115 = 

ya que 115 es el código Ascii de la letra «s». 

Esta nueva comparación dejará otro valor 
booleano en el tope de la pila. Cuando al me¬ 
nos uno de ellos sea «verdadero», lo que 
implica que habremos pulsado la «s» o la 
«S», el resultado obtenido por la operación 
lógica OR será también verdadero si el IF que 
le sigue lo evaluara, eliminara los dos boolea- 
nos de la pila y colocara en su lugar un 1 tal 
como queríamos. En caso contrario (pulsamos 
otra letra distinta) el valor almacenado en el 
stack será un 0. 

Resultado de la ejecución de la palabra 
«SALIDA»: Analiza la tecla pulsada, cuan¬ 
do sea «S» o «s» mete un 1 en el tope de la 
pila y un 0 en caso de no ser ninguna de las 
dos. En este momento sólo tendremos un va¬ 
lor almacenado en el stack, que depende de 
nuestra elección y que será el indicativo que 
utilizarán otras rutinas para saber quién ha sa¬ 
lido. Compruébelo tecleando: 

INFORMACION SALIDA 

Bueno, ya tenemos resueltas dos de las ca¬ 
jas que forman el primitivo organigrama de 
la Figura I. Continuemos con las que nos que¬ 
dan. La siguiente la hemos bautizado con el 
nombre «JUEGO». Las funciones que tene¬ 
mos previstas para él son las siguientes: 

— Establecer el número de monedas con las 
que vamos a comenzar el juego (20 en nues¬ 
tro caso). 

— Repetir por tumo la jugada mientras que¬ 
den monedas encima de la mesa. 

— Eliminar el número de monedas almace¬ 
nado cuando sea cero. 

Y nada más, es así de sencillo. Su codifica¬ 
ción será la del Programa IV en el que tras in¬ 
troducir en el stack un nuevo 20 (valor inicial 
de la cantidad de monedas) repite una llama¬ 
da a la palabra «TURNO», que ya definire¬ 
mos, hasta que desaparezcan todas. 

¡Ojo!, el intérprete tampoco nos aceptará 
esta nueva palabra hasta que no definamos 


«TURNO», que se emplea repetidas veces 
en el bucle. El porqué ya está explicado ante¬ 
riormente. 

El paso siguiente será desarrollar la selec¬ 
ción del turno de jugada para ver cómo dis- 


PROGRAMA IV 

: JUEGO 28 DUP BE6IN 8 > UH1LE CR 
TURNO DUP REPEAT DROP ; _ 

tinguir a quién le toca coger las monedas y las 
acciones a realizar en cada caso. Su organi¬ 
grama es el reflejado en la Figura III. 



Toma como partida del análisis el valor que 
la palabra «SALIDA» ha dejado en el stack 
según la tecla pulsada (0 si sale el ordenador 
y 1 si comienza el otro jugador) y podíamos 
descomponerlo de la siguiente forma: 

— Analizar el valor que dentro del stack re¬ 
presenta el indicativo del jugador. 

— Si se trata del ordenador, invocamos a 
la palabra que ejecutará todo el proceso ne¬ 
cesario para que eliga su jugada y actúe en 
consecuencia. 

— En caso contrario el que elije es el juga¬ 
dor. 

— A continuación calculará las monedas 
que quedan en la mesa. 

— Por último, cambia el indicativo del ju¬ 
gador actual por el del próximo (cambia el tur¬ 
no). 

¿Pasamos a codificarlos? El progra¬ 
ma V es la respuesta. 

Al ver el listado pueden surgimos varias pre¬ 
guntas. ¿A qué viene el «OVER» existente na- 


PROGRAMA V 

: TURNO OVER 8= IF ORDENADOR ELSE 
JUGADOR THEN QUEDAN SUAP 8= IF 1 ELSE 
• THBJ SUAP ; 

da más comenzar? Intente ver cómo llega el 
stack al principio de la ejecución de esta «pa¬ 
labra». En el tope contiene el número de mo¬ 
nedas que quedan y en el elemento inmedia¬ 
to inferior el indicativo de cada jugador. 

Si queremos analizar quién tiene en este mo¬ 
mento el turno, es evidente que, copiando el 
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elemento que está debajo del superior en la 
pila en el nuevo tope de la misma, podremos 
hacer todas las comprobaciones necesarias ya 
que, de esta manera, tendremos disponible el 
número que representa a cada jugador. 

Al final de esta palabra «TURNO» cam¬ 
biamos la posición del stack que contiene el 
distintivo del jugador por el de su contrario pa¬ 
ra que vayan realizando cada uno su jugada 
alternativamente. 

¿Cómo queda la pila después de 
esta rutina? En el elemento superior hemos 
dejado la cantidad de monedas que restan pa¬ 
ra que en la siguiente vuelta del bucle se com¬ 
pruebe si hemos llegado al fin o no. En el que 
está inmediatamente debajo guardamos el có¬ 
digo del siguiente jugador, ¿de acuerdo? 

En esta «palabra» utilizamos otras que to¬ 
davía no tenemos definidas. ¿Recuerda qué 
ocurrirá si la tecleamos así, directamente? Se¬ 
guro que todavía sí. 

La primera es «ORDENADOR» que se en¬ 
cargará de realizar la jugada del Amstrad 
de la siguiente manera: 

— Si el número de monedas aue restan es 
mayor que 4 elegirá un número aleatorio com¬ 
prendido entre 0 y 4 que será las que retire 
de la mesa. Vaya pensando en una nueva «pa¬ 
labra» que lo haga. 

— Si es menor que 5, el ordenador restará 
todas las que queden y ganará. 

— En ambos casos nos informará de lo que 
ha hecho. En Forth el Programa que realiza 
todas estas acciones sería algo semejante al 
VI que resulta ser muy sencillito y que lo úni¬ 
co que hace es añadir al stack un nuevo ele¬ 
mento que contiene las monedas elegidas para 
retirar. 

Pero ahora habrá que definir la «palabra» 
que consiga entregarnos en el stack un número 

PROGRAMA VI 

: ORDENADOR DUP 4 > IF ALEATORIO ELSE 

DUP THEN ELIJO 1 DUP . CR ; 

aleatorio comprendido entre 1 y 4. Para ello, 
ahí está el Programa Vil. 

¿Qué hace? Nada extraño. Calcula un 
número aleatorio comprendido entre 0 y 


PROGRAMA Vil 

i ALEATORIO RND 8192 / 1 ♦ ¡ 


32767, lo divide entre 8192 y le suma 1. ¿Le 
extraña el 8192? INo se asuste, hombre! 
Divida 32767 entre 4 y obtendrá algo pareci¬ 
do. Lo hacemos de esta forma ya que aunque 
realmente lo suyo será calcular: 

RND 4 * 32737 / 

de esta forma podría producírsenos un 
«overflow» en uno de los elementos del 
stack y darnos el consabido mensaje de stack 
lleno. 

Otra de las nuevas palabras, «JUGA¬ 
DOR», será la que nos indicará que es nues¬ 
tro turno. Para ello: 


— Preguntará el número de monedas que 
hemos quitado del total. 

— Analizará si el valor tecleado está com¬ 
prendido entre los márgenes permitidos. 

— Nos devolverá en el elemento superior 
de la pila la cantidad elegida. 

Podemos suponer que esto implica dos pro¬ 
cesos diferentes, uno de «PREGUNTA» y 
otro de «COMPROBACION», así que si lo 
codificamos quedará como el Programa VIII. 

PROGRAMA VIII 

: JUGADOR PREGUNTA COMPROBACION CR ; 

Y como siempre que ocurre esto nos encon¬ 
tramos con nuevas palabras, será necesario 
descender a un nivel inferior e intentar defi¬ 
nirlas a su vez. 

«PREGUNTA» se encarga de anotar el 
código Ascii de la tecla pulsada y restarle 48 
(que corresponde al 0) para obtener en el ele¬ 
mento superior del stack el número elegido. 
(Programa IX). 

PROGRAMA IX 

: PRE6UNTA .’ ES TU TURNO, FORASTERO. 

ELIGE. ’ KEY 48 - ; _ 

Seguidamente «COMPROBACION» 
analiza si este valor está dentro de lo estable¬ 
cido (I a 4) y en caso de no ser así eliminarlo, 
mediante un DROP, y volver de nuevo a la car¬ 
ga preguntándonos por un nuevo dato. Ob- ¡ 
serve en su listado (Programa X) una cosa muy 
curiosa: es una palabra «recursiva», es decir, 
que se invoca a sí misma. 


PROGRAMA X 

; COMPROBACION DUP 5 < IF DUP 0 ) IF 

.* CORRECTO. 1 ELSE .* INCORRECTO. 1 

DROP CR PREGUNTA COMPROBACION THEN 

THEN ; _ 

Bueno, ya tenemos en el stack tres datos: el 
indicativo del jugador, el número total de mo¬ 
nedas y la cantidad a retirar. Para calcular las 
que quedan empleamos la palabra «QUE¬ 
DAN» que, sencillamente, resta los dos ele¬ 
mentos superiores (total y las que quitamos) 
y el resultado lo guarda de nuevo en la pila 
dejándola ahora con dos elementos. (Progra¬ 
ma XI). 

PROGRAMA XI 

i QUEDAN - DUP .' QUEDAN 1 . CR ¡ 

Y con esto ya tenemos totalmente claras y 
definidas cada una de las palabras que for¬ 
man parte e intervienen dentro de la primiti¬ 
va «JUEGO». Sólo nos queda indicar que, 
una vez hemos salido del bucle que la forma, 
el juego toca a su fin y ya no necesitamos el 
número de monedas que quedan (es eviden¬ 
te que no hay ninguna). Por eso utilizamos un 
DROP al final déla palabra «JUEGO» para 



eliminarlo quedándonos solamente con el dis¬ 
tintivo del jugador que movería a continua¬ 
ción. 

Y con este último elemento pasaríamos a eje¬ 
cutar la palabra «FIN» en la que: 

— Analizamos el siguiente jugador. 

— Si es el ordenador (o contiene un cero), 
quiere decir que hemos ganado nosotros y le 
concedemos la revancha. 

— Si ocurre lo contrario, el Amstrad nos 
habrá dado una soberana paliza de la que es 
mejor no hablar. 

PROGRAMA XII 

: FIN 18 SPACES DUP 8= IF ." ME HAS 1 

ELSE .■ TE HE 1 THEN ." GANADO. SI 1 

8= IF .’ ME DAS 1 ELSE QUIERES 1 

THEN .’ LA REVANCHA ESCRIBE MONEDAS. 1 

CR ; 


¿Alguna dificultad para compren¬ 
der el listado del Programa XII? Re¬ 
coge lo que tendría que hacer la palabra 

«FIN». 

Ya está todo completo. Hemos descendido 
hasta el nivel más bajo de la definición de ca¬ 
da una de las nuevas palabras «Forth» co¬ 
menzando desde lo más alto y general para 
terminar desarrollando tareas muy particula¬ 
res y concretas que cumplan unos requisitos 
muy específicos. 

Pero en este método existe la pega de no 
poder «compilar», o «interpretar» en 

este caso, las palabras que contengan otras 
que todavía no estén definidas. 

A pesar de ello le recomendamos que ac¬ 
túe así siempre que pueda, codificando sus 
programas de arriba a abajo sobre el papel 
y, una vez concluidos, pase a teclearlos en el 
Amstrad en el orden más conveniente para 
evitar sorpresas. ¿De acuerdo? 

Pues disfrute con este nuevo lenguaje Forth. 
Compruebe que el stack ha quedado vacío te¬ 
cleando la palabra (.). De no ser así, algo no 
ha ido del todo bien según las normas. 

Pues disfrute con este nuevo len¬ 
guaje Forth. 
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EL METODO INTEGRAL 
MAS FACIL Y 


APRENDER 


CONTROLADO POR PROFESOR 


El Curso se compone de cinco discos FULL-MEMORY, que incluyen un Test de Nivel para evaluar los conocimientos 
del alumno, sesenta unidades completas (con tres tipos distintos de ejercicios) de dificultad progresiva, 
diez unidades especiales que ahondan en los aspectos más esenciales del Idioma (con un juego cada una), 
un programa de Redacción controlada y libre, y un disco para prácticas de conversación que permite dialogar 
con el ordenador sobre diversos temas en lengua inglesa. 

Todos los discos poseen un PLANNING para que el alumno organice su propio ritmo de trabajo 
y puede controlar sus progresos. 

En resumen, 1 MEGABYTE de contenidos y programas configuran COMPUTER ENGLISH SYSTEM, enfocados 
para ayudarnos a aprender o reforzar nuestro INGLES de forma estimulante y sugestiva. 


CENTRAL^ ZARAGOZA: CAMBRIDGE SCHOOL Zurita, 21, I o - izq. - Tel. 23 91 92 % CENTROS DISTRIBUIDORES: BARCELONA: BARNA 
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CENTROS COLABORADORES BARCELONA: NOVALINGUA. Avda. Diagonal, 600 • SAXON SCHOOL Gran Via de las Corles Catalanas, 437 



NOMBRE EDAD 

DIRECCIÓN TEL. C. POSTAL 

POBLACIÓN PROV. PROFESIÓN 

Cada disco se complementa con una cinta de cassette, grabada por profesores ingleses para que el alumno 

aprenda la parte oral. 

Precio curso completo: 24.900 pts. 


CES 

COMPUTER ENGLISH SYSTEM 

ZURITA 21.10izq.-ZARAGOZA 


FORMA DE PAGO: □ TALÓN BANCARIO A CES. COMPUTER ENGLISH SYSTEM • 

□ GIRO POSTAL A CES COMPUTER ENGLIS SYSTEM • □ CONTRA REEMBOLSO MAS GASTOS. 


DESEO RECIBIR EN MI DOMICILIO LOS PROGRAMAS SEÑALADOS 















dh Spitcfrum y íÁmafamá 



FAIRUGHT 



El mapa, 
los pokes y 



GAUNTLET 


Te descubrimos 
los secretos 
de un clásico de las 


todas 
las claves 
de un juego 
«superdifícll» 


máquinas recreativas 
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Monitor de disco 

A ver, entre nosotros, ¿quién no está harto de que le sucedan 
cosas raras al disco, que normalmente acaban en la 
misteriosa desaparición de ficheros cruciales? 
Además, el disco es una especie de territorio vedado al 
sufrido usuario, algo así como «El Castillo Negro del 
Hechicero Negro». Ya es hora de remediar este estado de 
cosas, y «DiscEdit» es el programa de hacer malabarlsmos 
con el disco, el programa es corto, bonito y usa un sofisticado 
estilo de programar. 



tor de disco que le permitirá editar 
y manipular cualquier sector o pista. 
Siendo cuidadosos, incluso es facti¬ 
ble recuperar ficheros borrados ac¬ 
cidentalmente. 

Para poder usarlo a pleno gas, he¬ 
mos de tomar en consideración có¬ 
mo trabaja el sistema de disco de 
Amstrad. Existen tres formatos es¬ 
tándar: 

— Formato Sistema (CP/M). 

— Formato IBM (IBM PC y CP/M 
compatible). 

— Formato datos. 

Todos ellos tienen algo en común: 
cada uno posee 40 pistas por disco, 
y los sectores son de una longitud de 
512 bytes. Las principales diferencias 
son el número de sectores por pista 
y los números de sector. 


Los distintos 
formatos de disco 


Aquí hay una lista para cada for¬ 
mato: 

— Formato sistema: 

9 Sectores por pista 
números de sector, 65 a 73 

— Formato IBM: 

8 sectores por pista 
números de sector, 1 a 8 

— Formato datos: 

9 sectores por pista 
números de sector, 193 a 201 

No es necesario preocuparse del 
formato del disco que queramos edi¬ 
tar, porque DiscEdit hará el trabajo 
por nosotros; lo anterior es sólo a tí¬ 
tulo informativo, y para el que desee 


modificar el programa por su cuen¬ 
ta y riesgo, adaptándolo a sus nece¬ 
sidades concretas. 


Funcionamiento 
de DiscEdit 


Pasemos a estudiar cómo funciona 
DiscEdit. 

Teclee el programa y sálvelo. Al 
arrancarlo, la pantalla cambiará a 
modo 2, se dibujará un espacio ce¬ 
rrado y se nos preguntará por una 
unidad de disco. Hay que responder 
0 (para el disco A) o 1 (para el B). 

El disco seleccionado entrará en 
funciones durante un momento. Dis¬ 
cEdit hace esto para averiguar el for¬ 
mato y otras cosas; el resultado de 
la operación aparecerá en la esqui¬ 
na superior derecha de la pantalla. 

Acto seguido, hay que indicarle al 
programa la pista incial donde co¬ 
menzará la edición (el «traek», un 
número comprendido entre 0 y 39. 
Lógicamente, después DiscEdit inqui¬ 
rirá acerca del sector que deseamos 
editar. 

Como hemos indicado más arriba, 
el número de sector puede variar con 
el formato del disco; no se preocu¬ 
pe: el rango de valores aceptables 
aparecerá siempre en pantalla. 

Al principio de cada línea hay un 
número hexadecimal que hace refe¬ 
rencia al «offset» de los datos en el 
sector, esto es, el número del byte del 
sector a partir del cual vamos a edi¬ 
tar. El resto de la línea muestra el 
contenido de ese byte, ¡unto con el 
de los 15 bytes siguientes y su equi¬ 
valencia en formato ASCII. 

La pantalla no es lo suficientemen¬ 
te grande para mostrar los 512 bytes 
de un golpe, así que sólo aparecen 



_ 
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256. La otra mitad se obtiene pulsan¬ 
do la tecla «2» del teclado numéri¬ 
co (f2 en el 664 y 6128). Pulsándola 
una vez más, se retorna a la prime¬ 
ra mitad. El número siguiente a «pá¬ 
gina» en la parte superior de la pan¬ 
talla indica la porción que estamos 
viendo: 0 si es la primera ó 1 si es la 
segunda. A la izquierda del número 
de página están los de pista y sector 
en uso en ese momento. 

Hay a su disposición una serie de 
opciones de edición como examinar, 
leer y escribir pistas y sectores. La ta¬ 
bla número 1 lista todo esto, ¡unto 
con los controles de teclado corres¬ 
pondientes. 

* TABLA I** 

No obstante, la página de ayuda 
listará todos los comandos pulsando 
0 del teclado numérico (fo en 664 y 
6128). 

Si ocurre algún error de disco en 
el proceso de edición, el mensaje 
aparecerá en la parte inferior de la 
pantalla ¡unto con el consabido men¬ 
saje de «RETRI, IGNORE 0 CANCEL?». 

En este caso, es conveniente rein¬ 
tentar, porque a veces funciona; no 
tenemos ni ¡dea de a qué se debe es¬ 
te comportamiento errático del Ams- 
trad. 


Cómo usar discEdit 


Vamos a echar un vistazo a un tí¬ 
pico ejemplo de cómo debiera usar¬ 
se DiscEdit. 

Primero de todo, el disco debe se¬ 
leccionarse. En la mayoría de los ca¬ 
sos, respondremos 0, señalando el 
disco A. Lo siguiente es escoger pis¬ 


ta y sector: supongamos que introdu¬ 
cimos 2 y 65, respectivamente. 

El sector se encargará del disco y 
aparecerá en pantalla. Si, a pesar de 
todo, nos hemos equivocado, pode¬ 
mos desplazarnos a través del disco 
con las flechas del cursor, mantenien¬ 
do apretada la tecla «SHIFT» 
(«MAYS» en el 6128). 

Por ejemplo, pulsando MAYS + 
cursor derecha, se cargaría del dis¬ 
co el sector 66 de la pista 2. Una vez 
que estamos en el sector deseado, 
podemos comenzar a editar. Hay 
dos formas de hacerlo: en hexade- 
cimal o en ASCII. Se selecciona uno 
y otro pulsando el 3 del teclado nu¬ 
mérico (f3 para 664 y 6128). 

En modo hexadecimal, los conte¬ 
nidos se alteran entrando dígitos del 
0 al 9 y letras de la «a» a la «f». Ob¬ 
serve que el teclado numérico no de¬ 
be usarse para los números; use las 
teclas encima de «QUERTY». 

El byte que está siendo editado 
puede cambiarse moviendo el cursor 
de edición al byte que queramos, 
pulsando las teclas del cursor apro¬ 
piadas. La otra posibilidad de edi¬ 
ción, como decíamos, permite entrar 
caracteres ASCII; por ejemplo, si se 
teclea ABCD, aparecerán los bytes 
&41, &42, &43 y &44. 

Se puede saber en qué modo de 
edición estamos observando dónde 
se encuentra el cursor; si está enci¬ 
ma de los números hexa, estamos en 
modo numérico, de lo contrario en 
ASCII. Una vez que el sector se ha 
dejado a nuestro gusto, podemos es¬ 
cribirlo en el disco. Para ello, basta 
pulsar la tecla 4 del teclado numéri¬ 
co (f4), y responder afirmativamen¬ 
te a la pregunta de si estamos segu¬ 
ros. Es el momento de descubrir có¬ 
mo guarda el Amstrad la informa¬ 
ción en el disco. 


Tabla 


Dista/sector 

Cursor derecha 
Cursor izquierda 
Cursor arriba 

Cursor^abajo 

i de edición 


id . e C ° n Ín 0l ei 464) 

me i r F 0 O C P C66V6128) 

ifl CPC664-6V28) 

IF2 CPC6 a 6 a 4 4 S 


Siguiente sector 
Sector anterior 
Avanza una pista 
Retrocede una pista 

un byte hacia ia izquierdo 
un byte hacia la derech 
una línea arriba 
una línea aba|o 


Escribir sector al disco 

p.n del Droarama 
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18 REM D1SCEDIT 

28 REM (C) AMS7RAD SEMANAL 

30 REM 

40 MOOE 2:INK 0,1:INK 1,2<S:PAPER 0 
50 MEMORY &7FFF: 60SUB 1278:' POKE fttC 
HIÑE CODE 

¿8 GOSUB ¿38:' IN1T1AL1SE 
78 UINDOU SUAP 8,1 
88 GOSUB 780:' DRAU SCREEN 
90 CLS 

188 7=0:CC=0:CR=0:UD=4:UI=24:0FF=64¡V 
4=W 

110 PR1NT CHRK23) ;CHR$< 1); :TAG «UD:6 
OSUB 548:POKE &9B8C,488¡GOTO 328 
128 S$=":F=0:UH1LE S4="¡C=8:F=F XOR 
1 ¡MQVE 0FF+CC*UI+T*8,334-CR*16:PR1NT 
0UD,CHR4<143)¡¡UHILE S4=" AND C<28: 
C=C+1:GOSUB 758:WEHD:UEND:1F F=1 THEN 
MOVE 0FF*CC*UHT*8,334-CR*16¡PRINT 0 
UD,CHR$(143)¡ 

138 ADDRESS=PEEK(4988B)+PEEK(&908C)#2 
56+CC+CR*lé 

140 1F ASC(S4)<237 THEN 358 
158 1F ASC(S$)<239 THEN GOSUB 1238:1F 
M0='N' THEN 128 

160 1F ASC(S4)=237 THEN K4='write':GO 

SUB 488¡GOTO 128 

178 1F ASC(S4)=238 THEN 1258 

188 IF ASC(S4)<244 THEN 1148 

198 1F ASC(S4)=246 THEN 1288 

280 1F ASC(S$)=247 THEN GOSUB 928:GOS 

UB 788¡GOSUB 828¡GOTO 338 

218 CC=0¡CR=8:T=0:CLS 


228 1F ASC(S4)=245 THEN POKE &908C,PE 

EK<&908C)XOR 1¡GOTO 338 

238 IF ASC(S4)=251 THEN sector=sector 

41 

248 IF ASC(S*)=258 THEN sector=sector 
-1 

258 IF ASC(S4)=248 THEN track=trackíl 
268 IF ASC(S$)=249 THEN track=track-l 
278 IF ASC(S4)=244 THEN GOSUB 540¡POK 
E &988C.&80 

280 IF sector >FSN*R THEN sector=FSN:t 
rack=tracMl 

290 IF sector<FSN THEN sector=FSN+R¡t 
racK=tracK-l 

388 IF track<0 THEN track=39 
318 IF tracK>39 THEN track=8 
328 Kf='read'¡GOSUB 488¡IF PEEK(498E3 
)<>8 THEN 128 

338 LOCATE 01,8,3:PR1NT81,drive:L0CA7 
E 01,19,3:PRINT01,tracK¡LOCATE 01,31, 
3:PRINT01,sector¡LOCATE 01,42,3:PR1NT 
II ,PEEK(4988C)AND ít?F ¡LOCATE «1,58,3: 
PRINT01,A$ 

348 LOCATE 12,1,1¡UINDOU SUAP 8,2¡TAG 
OFF 0UD:CLS03:CLS04¡CLS05:CALL 49888: 
TA6 IUD¡UINDOU SUAP 8,2:GOTO 128 
358 IF T=1 AND UD=4 THEN POKE ADDRESS 
,<PEEK(ADDRESS) AND 4F0)*VAL<'&'«S$) 
368 IF T=8 AND UD=4 THEN POKE ADDRESS 
,(PEEKtADDRESS) AND AF)«VAL<'&MS4)*1 
6 

378 IF UD=5 THEN POKE ADDRESS,ASC(S4) 
380 LOCATE II,94CC*3,54CR:KÍ=HEX$(PEE 
K(ADDRESS)):IF LEN(K4)=1 THEN PRINT01 

i 9 i 

398 PRINTIl.KI¡LOCATE «1,59+CC,54CR:K 
4='.'¡IF PEEK<ADORESS)>31 THEN K4=CHR 
KPEEK(ADDRESS)) 

488 PRINT01,K4¡ 

418 IF UD=4 THEN T=T XOR 1:IF 7=8 THE 
N CC=CCM 

420 IF UD=5 THEN CC=CC*1 
438 IF CC=16 THEN CC=8:CR=CR-H 
440 IF CO-1 THEN CC=15:CR=CR-1 
458 IF CR=16 THEN CR=8 
468 IF CR=-1 THEN CR=15 
478 GOTO 128 

488 J=PEEK(498E5)¡U=PEEK(490E6) 

498 POKE 498E5,tracK¡POKE 498E4,drive 
¡POKE 498E6,sector¡POKE 498E3.8 
508 IF ASC(K4)=114 THEN CALL 498B1 EL 
SE CALL 498C3 

518 IF PEEK(490E3)<>8 THEN CLS:PR1NT' 
DisK '¡K4¡' error, Track:"jtrackj’Sec 
tor:';sector;CHRf(7):track=J:sector=U 
;74=":UH1LE 74="¡74=INKEY4¡UEND:CLS 
¡RETURN 

528 IF ASC(K4)=119 THEN PRINT'Sector 
written success-fully*;CHRf<7) 



538 RETURN 
548 GOSUB 828 

558 CLS¡LOCATE 1,1 ¡PRINT’Input Drive: 
*; :nc=l :ni=8:na=l¡GOSUB 840¡drive=VA 
L<u$)¡LOCATE 01,8,3:PRINT01,dri ve 
560 IF drive=8 THEN iA ELSE IB 
578 FSN=PEEK(PEEK(DPH416*DRIUE)4PEEK( 
DPH+H16*DRIVE)»256*15) 

588 R=8:IF FSN=441 THEN al='SYSTEM' E 
LSE IF FSFWtCl THEN a$='DATA ■ ELSE 
a*='!BM 1 :R=7 

598 LOCATE II,58,3:PR1NT01 ,a$ 

688 CLSiLOCATE 1,1¡PRINT'Input Track: 
' ¡ ¡ nc=2 ¡i» i=0 :nia=39: GOSUB 848: trac k=V 
AL(irt) ¡LOCATE 01,19,3;PR1N7I1,track 
618 CLSiLOCATE 1,1¡PRINT CHR4(22);CHR 
í(l) ;'Input Sector <'¡CHR»(8)¡FSN;CHR 
4(8)¡CHR4(8)¡FSWR;CHR$<8);')¡ '¡ 
CHR4(22) ;CHR4(8) ¡ ¡nc=3:i»i=FSN:na=FSN+ 
R:GOSUB 848:sector=VAL(wf)¡LOCATE 01, 
31,3¡PRINTI1,sector;' ■ 

628 CLSiRETURN 

630 CALL 4908E¡'init machine code 

648 DPH=PEEK(4BE40)4PEEK(4BE41)i2564l 

0:D$= * 8123456789ABCDEF 1 

650 KEY DEF 14,8,245:KEY DEF 5,0,246 

668 KEY DEF 15,0,247:KEY DEF 28,8,237 

678 KEY DEF 12,0,238:KEY DEF 13,0,244 

680 KEY DEF 2,1,241,249,249 

698 KEY DEF 8,1,248,248,248 

780 KEY DEF 8,1,242,258,258 

718 KEY DEF 1,1,243,251,251 

728 POKE &988B,0:POKE &908C.&80 

738 UINDOU II,1,88,22,25¡UINDOU 12,2, 

88,5,25¡UINDOU 03,2,6,5,28¡UINDOU 04, 

9,56,5,20¡UINDOU 05,59,75,5,28 

748 RETURN 

758 S4=INK£Í$:1F <S4<CHR4<237) OR S4> 
CHRK252)) AND lNSTR("+V*,UPPERf(S4) 
)<2 AND LEN(V$)>8 THEN S$=" 

768 IF VIO" THEN S4=UPPER4(S$) 

778 RETURN 

788 CLS 01¡PEN 11,1¡LOCATE 01,1,1 ¡PR1 
NT81,'Anstrad Disc Sector Editor.' 

790 MOVE 0,380:DRAUR 216,8 
888 MOVE 0,72¡DRAUR 0,272:DRAUR 688,8 
¡DRAUR 0,-272:DRAUR -608,0¡MOVER 48,8 
¡DRAUR 0,272¡MOVER 405,0¡DRAUR 8,-272 
818 RETURN 

828 LOCATE 01,1,3:PR1NT01,'Dri ve¡ 
Track: Sector: page: 

Format: '¡RETURN 

838 nc=2:mi=2:ma=18 
848 w$=" 

858 s4=" ¡UHILE s4=" OR LEN(i4)=nc A 
ND S40CHR4U27) AND s40CHR4(13) OR 
s4=CHR4(127) AND t4=" :s4=INKEY4:UEND 
868 IF s4=CHR$(13) THEN 988 
878 IF s4=CHR$(127) THEN w$=LEF74(w4, 


72 AMSTRAD ESPECIAL 









LEN(w$)-l)¡PRINT CHW(8)¡CHR$(1¿); 

888 IF sf<)CHR$<127) THEN PRINT si;:w 
*=wí*s$ 

898 60T0 858 

980 1F VAL(wÍXni OR VAL(w*)>na THEN 
FOR a=l 70 LEN(w$)¡PRINT CHR*(8)¡CHR* 
<ló>¡:NEXT:PR1N7 CHR»(?);:60T0 848 
918 RETURN 

928 UINDOU SUAP 0,1:CLS 

938 LOCATE 31,1:PRINT CHR$<24)¡* *COM 

MANO MENU* *;CHR*<24) 

948 LOCATE l,3¡PRINT CHR*<24)¡* Novin 
9 to new track or sector¡*¡CHR$<24) 
958 PRINT 1 <SH1F7> MCHR$(243X* ... 
nove torward one sector. 1 
968 PRINT 1 <SH1F7> •4CHR*<242X* ... 
nove back one sector. 1 
978 PRINT* <SH1FT> ■♦CHR$(248)+ 1 ... 
nove torward one track. 1 
980 PRINT* <SHIFT> MCHR$<241X’ ... 
nove back one track. 1 
998 LOCATE 1,9:PRINT CHR*<24)¡* Editi 
ng comands¡'¡CHR*(24) 

1800 PRINT 1 NCHRI(243)+ 1 ... nove r 
ight one byte.* 

1818 PRINT 1 *4CHR4<242X* ... «ove 1 
ett one byte. 1 

1020 PRINT 1 , 4CHRt<241)4 1 ... nove d 
own one 1 ine. 1 

1838 PRINT 1 1 4CHR»<248)4 1 ... nove u 
p one 1 i ne. * 

1840 LOCATE 1,15:PRINT CHR$<24)¡* Oth 
er comand keys (nuneric KEY pad): 1 ;C 
HR$(24) 


1850 PRINT* F8 ... Help. 1 

1868 PRINT 1 F1 ... Select new disk p 

araneters. 1 

1878 PRINT 1 F2 ... Page toggle, (tog 
gles display between bytes* 

1888 PRINT 1 8-2 

55 4 256-511 o-f a sector). 1 
1090 PRINT 1 F3 ... Toggles between H 
EX 4 ASCII Tor editing." 

1180 PRINT 1 T4 ... Uri tes sector to 
disk. 1 

1110 PRINT* F5 ... Exit progran.' 
1128 LOCATE 30,24:PR1NT CHR»(24)¡* PR 
ESS SPACE TO EXIT *;CKR$(24):sl= 1 *:UH 
ILE s*<>* *¡s$=lNKEY$:UEND 
1138 CLSiUINOOU SUAP B,1:RETURN 
1148 1F ASC(S$)=243 THEN 418 
1158 IF ASC<S$)=242 AND UD=4 THEN T=7 
XOR 1:IF T=1 THEN CC=CC-1 
1168 IF ASC(S<)=242 AND UD=4 THEN 438 
1178 IF ASC(Sf)=242 AND UD=5 THEN CC= 
CC-1¡GOTO 438 

1180 IF ASC(S$)=240 THEN CR=CR-1:G0T0 
458 

1198 CR=CR4l¡GOTO 450 
1288 TAGOFF 0UD ¡UNJO XOR 1:TAG *WD¡T 
=8 

1218 IF UD=4 THEN U1=24:0FF=64:W=W 
ELSE U1=8:0FF=464:V*=** 

1220 GOTO 128 

1238 IF ASCtSf)=23? THEN K*=‘Save sec 

tor* ELSE K*=*Quit progran 1 

1240 LOCATE 1,1¡PRINT K*;* ARE YOU SU 


< 1 *YN 1 ,H$X2:H$=UPPER$(INKEY$):UEND¡C 

LS:RETURN 

1258 TAGOFF «UD:PR1NT CHR$(23);CHM(8 
) ¡MODE liCALL 4BB80 
1268 END 

1278 IF PEEK(49008)=4DD THEN RETURN 

1288 RESTORE 1368 

1298 CHECKSUM=8 

1308 FOR 6=49080 TO 498DC 

1318 READ B*;P0KE G,VAL< 1 4 1 4B») 

1328 CHECKSII^CHECKSUN+VAL < "4 1 •* M) 
1338 NEXT 

1348 IF CHECKSUM=30232 THEN RETURN 
1358 PRINT *M/C DATA ERROR*¡CHR$<7) 
1368 DATA DD,2A,8B,90,DD,E5,C1,78,E6, 
7F 

1378 DATA 32,8D,98,CD,62,98,79,32,80, 
98 

1388 DATA CD,62,90,DD,E5,06,03,CD,81, 
98 

1390 DATA 06,18,DD,7E,08,32,8D,90,CD, 
62 

1408 DATA 90,3E,28,CD,5A,B8,DD,23,18, 
EE 

1418 DATA 86,82,CD,81,98,DD,El,86,18, 
DD 

1428 DATA 7E,80,FE,28,D2,45,98,3E,2E, 
C5 

1430 DATA CD,5D,BB,C1,DD,23,18,ED,3E, 
0D 

1448 DATA CD,5A,BB,3E,0A,CD,5A,BB,DD, 
E5 

1458 DATA C1,3E,08,89,C2,04,90,C9,21, 
8D 

1460 DATA 90 ,ED,6F,CD,70,90,ED,6F,CD, 

70 

1478 DATA 90,C9,E6,8F,C6,38,FE,3A,FA, 
7B 

1488 DATA 98,C6,07,C5,CD,5A,BB,C1,C9, 
C5 

1490 DATA 3E,09,CD,5A,BB,C1,18,F7,C9, 

88 

1508 DATA 88,08,DD,21,DD,90,21,08,98, 
CD 

1518 DATA D4,BC,DD,75,88,DD,74,01,DD, 

71 

1528 DATA 82,21,DC,90,CD,D4,BC,DD,75, 

83 

1538 DATA DD,74,84,DD,71,05,C9,21,00, 
88 

1548 DATA ED,5B,E4,90,3A,E6,90,4F,DF, 
DD 

1558 DATA 98,D2,D5,90,C9,21,80,80,ED, 
58 

1568 DATA E4,90,3A,E6,90,4F,DF,E8,90, 
D2 

1578 DATA D5,98,C9,3E,FF,32,E3,98,C9, 

84 

1588 DATA 85 
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¿POR QUE NO TRUCAR 
EL CP/M 3.0? 

Francisco G. R. 


De todos es sabido los trucos que podemos utilizar en Basic 
pora nuestras aplicaciones, y tan sigilosamente guardamos 
para nuestros programas. Pues bien, éstas también las 
podemos encontrar en el CP/M. 


crearnos un 
fichero autoejecutable desde 
CP/M? 

Lo podemos hacer de varias 
maneras, una de ella sería 
utilizando un procesador de textos 
e introducir los mandatos u 
órdenes deseadas. Por ejemplo, 
supongamos que cuando 
cargamos el CP/M, 
necesariamente tenemos que 
preparar el canal de la impresora 
y a continuación ejecutar un 
programa: 

DEVICE CONIN = LPT 
PROGRAMA. COM 

Esto nos dará una entrada al 
canal de impresora para mandar 
toda la salida del monitor a la 
impresora. Si no dispusiéramos de 
un procesador de textos los 
haríamos desde Basic de la 
siguiente forma: 

10 OPENOUT "DISC.SUB" 

20 PRINT #9, "DEVICE 
CONIN = LPT" 

30 PRINT #9, "PROGRAMA. 
COM" 

40 CLOSEOUT 

Lo último que nos falta decir es 
el nombre del fichero y cómo 
ejecutarlo. Si lo queremos 
ejecutar, el nombre del fichero 
cargador sería "PROFILE. SUB", 
si lo queremos cargar cuando 
entremos en el sistema sería un 
título diferente al de "PROFILE". 
Pero además debe de estar 
presente en el disco del programa 
"SUBMIT.COM", que es el 
encargado de leer los ficheros 
terminados en 'SUB. 

¿Cómo simular un arranque tipo 
profesional de IBM, en el cual nos 



pregunte la fecha y la hora? 

La creación del fichero 
autoejecutable está descrita 
anteriormente, ahora tan sólo 
tendríamos que introducirle los 
ficheros adecuados para que 
pueda ejecutar esta orden. El 
fichero encargado de cargar el 
reloj del equipo y ponerlo en hora 
se denomina 'DATE'. Si el primer 
fichero que introducimos es el de 
'DATE', nos mostrará la fecha que 
tiene implícita y el día, también 
nos dirá el tiempo que llevamos 
con el ordenador encendido (o 
bien desde la última vez que 
efectuamos un Reset). Si le damos 
la opción de: 

DATE CONTINUOUS (también es 
válido sólo la C) 

El ordenador nos mostrará el 
reloj en tiempo real que podemos 


ver cómo va avanzando segundo 
a segundo. Pero si queremos tan 
sólo que nos pida la fecha y la 
hora la opción será la siguiente: 

DATE SET 

El ordenador nos pedirá 
primero la fecha y a continuación 
ia hora, si bien pulsando la tecla 
de Return dejaríamos el valor que 
tiene por defecto. 

Todos sabemos cómo sacar un 
listado desde CP/M con el 
comando TYPE PROGRAMA.TXT, 
pero si el fichero tiene por 
extensión un COM, REL, etc., el 
ordenador nos muestra una serie 
de símbolos y caracteres no 
legibles, ¿podríamos listar un 
programa con la extensión COM, 
REL, etc.? 

Sí, es posible ¿pero cómo?, pues 
bien tan sólo debemos utilizar un 







[j j¡ 
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sólo queremos sacar los 
programas que estén en 'READ 
ONLY', (programas sólo de 
lectura) el atributo será 'RO', y si 
sólo queremos los 'READ WRITE', 
(caso contrario al anterior, 
escritura y lectura) el atributo 
sería 'RW'. Para finalizar esta 
parte de excluir programas o sólo 
sacar programas en determinados 
hay otra opción que nos muestra 
los programas que son invisibles 
(programas en sistema), que se 
denota como 'SYS', aunque 

también se puede 
efectuar con el 
comando 
DIRS o 


DIRSYS. 

Para acabar las opciones DIR 
vamos con una muy curiosa, 
consiste en sacar un número de 
líneas determinado a partir del 
encabezamiento. O sea, que 
podemos listar los programas del 
disco de tres en tres líneas o de 
diez en diez programas (cinco 
líneas). El comando es el 
siguiente: 

DIR I LENGTH = 10] 

A lo mejor cuando estamos 
borrando ficheros desde CP/M, 
nos encontramos que borramos 
alguno que no queríamos, sobre 
todo cuando borramos una serie 
de éstos que comienzan con la 
misma letra, pero hay uno de 
ellos que no queríamos borrar y 
lo hemos destruido. Pues bien, 
nosotros podemos obligarle al 
ordenador que nos pida permiso 
o conformidad para que efectúe 
el borrado de cualquier 
programa. Esto lo realizaremos de 
ia siguiente forma: 

ERAse [ CONFIRM ] (o bien tan 
sólo C) 

De esta forma tan sólo nos 
borrará los programas que 
nosotros le indiquemos. 


la capacidad de los programas 
que tiene en el disco. Usted 
podría hacer dos cosas, la 
primera era irse a Basic, efectuar 
un CAT, en el cual sí le dice la 
capacidad, y la segunda 
sería utilizar un DIR 
I FULL ]. Pero esta 
última opción es un poco 
enmarañada, y nosotros 
le vamos a dar una en 
la que se sienta tan 
familiar como el 
CAT de Basic: 


comando de CP/M 
denominado 'DUMP'. El 
comando DUMP nos da un listado 
del programa en dos formatos: 
una a la izquierda con los códigos 
hexadecimales, y una segunda a 
la derecha en forma ASCII. De 
esta forma, y si previamente 
hemos instalado la impresora, 
podremos realizar un listado por 
impresora o bien por pantalla de 
los programas que no podemos 
acceder a ellos mediante un TYPE. 

¿Cómo utiliza usted el comando 
DIR? ¿Le gustaría sacarle más jugo 
a este comando? 

Si está dispuesto, adelante. 
Posiblemente usted no se sienta 
satisfecho con sólo utilizar el 
comando DIR a secas, pues 
muchas veces le gustaría conocer 


DIR [SIZE] 

También podemos 
excluir ficheros 
cuando deseemos 
sacar un directorio 
del disco, por 
ejemplo, cuando 
tenemos muchos 
programas en el disco 
y sólo queramos sacar algunos en 
determinado. Esto lo podemos 
conseguir con el atributo entre 
corchetes 

I EXCLUDE = PROGRAMA.EXT ]. 
Hablando de excluir programas si 
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IVA 


autónomo podrá llevar perfectamente su IVA 
sin ningún tipo de limitación, debido a que el 
número de cuentas y movimientos en un prin¬ 
cipio es suficiente para cualquier aplicación, 
aunque ésta se extienda a empresas peque¬ 
ñas. 


DISTRIBUIDOR ZELIG SOFTWARE 
AMSTRAD CPC 6128/664/464 CON DISCO 

Víctor Prieto 


Profesionales liberales, autónomos y 
demás personas acosadas por el IVA, 
hallarán en el Control del IVA de Zelig, la 
solución cómoda a los quebraderos de 
cabeza de las declaraciones trimestrales. 



I ingreso de España en 
la Comunidad no sólo nos ha dado un carác¬ 
ter más europeo y ha propiciado la apertura 
de las fronteras al comercio, además nos ha 
traído un regalo que encontramos hasta en la 
sopa: el IVA. 

Antes, con pagar simplemente bastaba, 
ahora hemos de pagar el recargo del IVA, 
ahora todos somos recaudadores de Hacien¬ 
da y el IVA que se nos abona hemos de de¬ 
volverlo escrupulosamente, pues como dice la 
canción: «Todos somos prisioneros de Hacien¬ 
da». 

Como con esta entidad las cuentas deben 
ser claras y Hacienda tarde o temprano aca¬ 
ba enterándose de todo, gracias a su poten¬ 
cial informático, ¿por qué no utilizar sus mis¬ 
mas armas? 


Poniendo a la informática de nuestro lado, 
podemos llevar un control completo de nues¬ 
tras facturas con el programa de Zelig. 


Características 


El Control de IVA, tiene capacidad para ma¬ 
nejar hasta 150 cuentas entre clientes y pro¬ 
veedores, cada una de las cuales ha de ser 
identificada por un código de cinco dígitos, los 
cuales pueden ser ajustados a la normativa exi¬ 
gida en el Plan General Contable. En este ca¬ 
so, los clientes quedarán agrupados en el sub¬ 
grupo 43, y los proveedores en los capítulos 
40, 41,42. 

Por otra parte el fichero de apuntes que es 
capaz de soportar el programa, asciende a 
2.000 anotaciones, susceptibles de ser borra¬ 
dos una vez alcanzado el tope. 

Con tal capacidad cualquier profesional o 


Personalización 


Como todos los programas de la casa, éste 
puede ser personalizado, cosa que no resulta 
obligatoria, en nuestro caso si elegimos la per¬ 
sonalización, nuestro nombre aparecerá en lis¬ 
tados e informes impresos, en caso de no pro¬ 
ceder a ésta, también puede usarse sin ningún 
tipo de problemas. 

En este caso no existe código de cliente, con 
lo cual evitamos el tema de tener que intro¬ 
ducirlo en la aplicación número 100 del mis¬ 
mo, evitando el riesgo de que por error u ol¬ 
vido éste quede totalmente inutilizado. 

Por el mismo motivo, y ante la ausencia del 



NOMBRE DE LA EMPRESA: INVESTIGACION SA 

PERIODO: OCTUBRE./OCTUBRE 

FECHA RECEP COD. PROVEEDOR 

LIBRO REGISTRO DE 

B. IMPONIBLE 

FACTURAS 

TIPO 

PAGINA 1 

RECIBIDAS 

CUOTA 

05/10 

01000 

40001 

PAPELERIAS FOLEO DE 

ORO 

15,000 

12* 

1,800 

05/10 

01000 

40001 

PAPELERIAS FOLEO DE 

ORO 

15,000 

5* 

750 

12/10 

01001 

40002 

PINUTRAS JACINTO SA. 


40,000 

12* 

4,800 

12/10 

01001 

40002 

PINUTRAS JACINTO SA. 


40,000 

5* 

2,000 

15/10 

01002 

40003 

MOBILIARIO GARCIA Y 

CIA. 

200,000 

30* 

60,000 

15/10 

01002 

40003 

MOBILIARIO GARCIA Y 

CIA. 

200,000 

7* 

14,000 

12/10 

01003 

40004 

DECORACION AMBIENTE 

SA. 

75,000 

12* 

9,000 

12/10 

01003 

40004 

DECORACION AMBIENTE 

SA. 

75,000 

5* 

3,750 

07/10 

01004 

40005 

MATERAL OFICINA PEREZ 

34,000 

12* 

4,080 

07/10 

01004 

40005 

MATERAL OFICINA PEREZ 

34,000 

5* 

1 ,700 

22/10 

01005 

40006 

INDUSTRIAS CORRAL E 

HIJOS 

77,000 

12* 

9,240 

22/10 

01005 

40006 

INDUSTRIAS CORRAL E 

HIJOS 

77,000 

5* 

3,850 

15/10 

01006 

40007 

COMPUESTOS ACIDOS SA 


23,000 

12* 

2,760 

15/10 

01006 

40007 

COMPUESTOS ACIDOS SA 

• 

23,000 

5* 

1,150 




TOTAL I.V.A. 

SOPORTADO: 


118,880 
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la completa confianza de que éstas van a fun¬ 
cionar sin ningún tipo de problema. 

Una vez realizada la personalización pode¬ 
mos poner en marcha el programa y empe¬ 
zar a trabajar para Hacienda. 


Menú principal 


Con el siguiente repertorio funcional pode 
mos elegir la actividad deseada. 

Fl: Introducción de apuntes. 

F2: Consultas y listados 
F3: Altas clientes/proveedores 
F4: Bajas clientes/proveedores 
F5: Listado clientes/proveedores 
F6: Inicialización de ficheros 
7: Corrección de apuntes 

Para empezar a trabajar con el pro¬ 
grama, la primera opera¬ 
ción a realizar es 


Mes del apunte 
Número de factura 
Código de cliente/proveedor 
Fecha de la factura 
Base imponible 
Tipo de IVA 
Recargo 

Observando el número de apartados y su 
índole podemos advertir que se contemplase 
todos los datos interesantes y de utilidad en 
cada factura, con los cuales llevar el control 
de nuestro IVA. 

La inserción de datos en cada campo se rea¬ 
liza de forma cómoda y sólo es necesario in¬ 
troducir valores numéricos, el ordenador se 
encarga de buscar en memoria el artículo al 
que corresponde el código e imprimirlo en su 
correspondiente apartado. 


la utilizada para estos menesteres podemos 
conseguir los siguientes datos: 

Listado de facturas emitidas 
Listado de facturas recibidas 
Cuentas con clientes 
Cuentas con proveedores 

Las consultas de facturas se realizan por fe¬ 
cha, determinando el comienzo y fin de dicha 
consulta, para las cuentas de clientes o pro¬ 
veedores, ésta se realiza entre los plazos fija¬ 
dos y la entidad o persona elegida. 

Fuera de esta opción podemos obtener un 
completo listado de todos 
los clientes y 
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la de dar 
de alta a los clientes y 
proveedores, operaciones que es aconseja¬ 
ble hacer utilizando la codificación ajustada 
al Plan General Contable. 

Utilizando la opción n.° 3 del menú proce¬ 
demos a rellenar el fichero de clientes y pro¬ 
veedores, cada uno de los cuales dispone de 
un código numérico de 5 cifras y una longi¬ 
tud de texto de 28 caracteres. 

En caso de error, y siempre antes de pulsar 
la tecla ENTER, podemos volver al apartado 
anterior, es decir el código con un toque de 
tecla, en caso de advertir nuestro error des¬ 
pués del ENTER, la opción F4 nos saca del 
apuro borrando de los ficheros el cliente y su 
código. 


En este campo, 
al teclear el número de mes 
aparecerá automáticamente escrito el nom¬ 
bre de ésta, siguiendo similar proceso al po¬ 
ner el código de cliente aparecerá el nombre 
del mismo, una forma acertada de captar los 
datos. Como siempre en caso de error y an¬ 
tes de que la ficha quede grabada, podemos 
volver a cualquier campo anterior y modificar 
lo que deseemos. 

Consultas e 
información impresa 

Toda la información puede ser obtenida por 
pantalla o impresora, en la opción F2 que es 


proveedores me¬ 
diante la F5, en el cual aparecerán 
separados en dos grupos según la índole de 
cada uno. 


Libro de 
apuntes llenos 

En caso de agotar la capacidad de registrar 
apuntes del programa 2.000, podemos pro¬ 
ceder al borrado de los mismos para continuar 
trabajando. Antes de realizar tal operación es 
imprescindible obtener un listado de todos los 
movimientos, con el cual guardaremos una in¬ 
formación indeleble para cualquier consulta. 
Otro método válido, puede ser realizar una 
copia completa del disco; programa+ficheros, 


Diario de apuntes 


Una vez dados de alta todos los profesio¬ 
nales y empresas con los que vamos a traba¬ 
jar, podemos iniciar el proceso de anotacio¬ 
nes y apuntes en el diario. 

Este está estructurado en forma de fichas, 
cada una de las cuales contiene los siguientes 
apartados: 


NOMBRE DE LA EMPRESA: INVESTIGACION SA 

PERIODO: OCTUBRE/OCTUBRE 

FECHA FACT. COD. CLIENTE 

LIBRO 

B 

REGISTRO DE 

IMPONIBLE 

FACTURAS 

TIPO 

PAGINA 1 

EMITIDAS 

CUOTA 

12/10 

04560 

43001. 

INDSUTRIAS COMERCIAL 



40,000 

127. 

4,800 

12/10 

04560 

43001 

INDSUTRIAS COMERCIAL 



40,000 

57 

2,000 

15/10 

02300 

43002 

FOTOGRAFIA JULIAN GOMEZ 


50,000 

127. 

ó, 000 

15/10 

0 2300 

43002 

FOTOGRAFIA JULIAN GOMEZ 


50,000 

57 

2,500 

20/10 

43001 

43003 

ESTUDIO ALFA PUBLICIDAD 


100,000 

127 

12,000 

20/10 

43001 

43003 

ESTUDIO ALFA PUBLICIDAD 


100,000 

57 

5,000 

17/10 

01222 

43004 

AGENCIA INFORMACION & 

CO. 


35,000 

127 

4,200 

17/16 

01222 

43004 

AGENCIA INFORMACION & 

CO. 


35,000 

57 

1 ,750 

08/10 

43005 

43005 

IDIOMAS EL INGLES 



70,000 

127 

8,400 

08/10 

43005 

43005 

IDIOMAS EL INGLES 



70,000 

57. 

3,500 

19/10 

04220 

43006 

ACADEMIA MATEMATICA Y 

CIA 


23,000 

127 

2,760 

19/10 

0 4220 

4300* 

ACADEMIA MATEMATICA Y 

CIA 


23,000 

57 

1 , 1 50 

19/10 

55001 

43007 

CONDUCCIONES EL CANAL 



120,000 

127 

14,400 

1 9 /1 0 

55001 

43007 

CONDUCCIONES EL CANAL 



120,000 

57 

6,000 

14/10 

23001 

43008 

ALCHOLERA GRANADINA 



55,000 

127. 

6,600 

14/10 

23001 

43008 

ALCHOLERA GRANADINA 



55,000 

57 

2,750 




TOTAL I.A. 

REPERCURTI DO: 


83,810 
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con lo cual sí que no perderemos ni un solo 
bit. 

La actualización de los ficheros del cuader¬ 
no de apuntes y su puesta a cero se ejecuta 
con la F6, antes de proceder a la cual, el or¬ 
denador nos avisa de que se van a perder los 
ficheros y nos pide confirmación. Realizada és¬ 
ta podemos seguir introduciendo apuntes has¬ 
ta agotar de nuevo la capacidad. 


cortas. Cualquier usuario puede hacerse con 
el dominio del programa en dos horas de ins¬ 
trucción. 


Recapitulación 


Instrucciones 


La extremada sencillez del software del IVA, 
hace casi innecesario el uso de instrucciones, 
de todas formas y para la toma de contacto 


ZELIG nos obsequia con un programa de 
manejo sencillo y de una eficacia y prestacio¬ 
nes grandes para su uso. 

Con un amplio dossier de informes impre¬ 
sos y consultas por pantalla, nada escapará 
a nuestros ojos y podremos tener amplia in¬ 
formación de nuestros movimientos de dien¬ 
tes y facturas. 


con que estemos operando, resultando lenta 
la ejecución cuando se trabaja con cifras ele¬ 
vadas. 

Es importante reseñar que al final de la uti¬ 
lización el programa realiza un cierre de fi¬ 
cheros, por lo que no debemos extraer el dis¬ 
co hasta haber concluido todo el trabajo y sin 
dejar al programa realizar las operaciones fi¬ 
nales del disco, en este punto un corte fortui¬ 
to de la energía puede estropear el trabajo de 
varias horas, las copias de seguridad nunca 
están de más. 

Un programa sencillo y eficiente con el que 
Hacienda y las dichosas declaraciones trimes- 
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NOMBRE de la Et- 

r E r,ODO. OCTUBRE/OCTUBRE 


LIBRO 

B 


fecha fact : 


COD. CLIENTE 


12/10 
12/10 
15/10 
15/10 
20/10 
20/10 
17/10 
17/10 
08/10 
08/10 
19/10 
19/10 
19/10 
19/10 
14/10 
14/10 


04560 
04560 
02300 
02300 
43001 
43001 
01 222 
01222 
43005 
43005 
04220 
04220 
55001 
55001 
23001 
23001 


43001 

43001 

43002 

43002 

43003 

43003 

43004 

43004 

43005 
43005 
4300¿ 
4300* 
43007 
4300" 
43003 
43003 


índsutrias comercial 

indsutrias comercial^ 
FOTOGRAFIA JULIAN 

FOTOGRAFIA JLL^A^ ci daD 

estudio alfa pub ad 

ESTUDIO ALFA PU cio n & c0 . 

AGENCIA ,p ORM AClON & CO. 
AGENCIA INFORMA « 

IDIOMAS el INGLE- 
IDIOMAS el INCLEo y cia 
ACADEMIA ^TEMATICA y C1A 

ACADEMIA M TEMA 

CONDUCCIONES caNAL 

CONDUCCI ONE E^ ^ NA 

ALCHOLERA GRANADINA_ 

- TOTAL I.O.A. 


registro de facturas 

IMPONIBLE TIPO_ 

40 ,000 
40,000 
50,000 

50,000 

100,000 i¿;; 

100,000 
35,000 
35,000 
70,000 

70,000 5/ 

23,000 

23,000 % 

120,000 
120,000 
55,000 1 

55,000 5/. 

REPERCURTIDO: 


emitidas 

CUOTA 

4,800 
2,000 
6,000 
2,500 
12,000 
5,000 
4,200 
1 ,750 

8.400 
9,500 
2,760 
1 ,1 50 

14.400 
6,000 
6,600 
2,750 

83,310 
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tohbre de ea **** COD. mBLE tiro_ 

pER ,odo. dctubre/ocubr^ or 


FEC BA__reCT._COD. 


0322' mil olcOBACl_W_AM^.-------¡' poB TADO. 


Ambiente 



i 2/i® 


03221 


del usuario inexperto el programa está acom¬ 
pañado por 10 páginas de instrucciones en las 
que se describe el manejo del mismo de prin¬ 
cipio a fin. 

En ellas se tocan todas las opciones y ope¬ 
raciones para conseguir el óptimo rendimien¬ 
to del software con explicaciones concretas y 


TOTAL 


La sencillez de manejo de las opciones y su 
natural reproducción de los procesos reales 
hace que su aprendizaje y posterior utilización 
no representen ningún impedimento para al¬ 
guien que no haya tocado en su vida esas má¬ 
quinas diabólicas llamadas ordenadores. 

Como en todo este tipo de programas la ra¬ 
pidez y velocidad en el proceso de datos vie¬ 
ne dada por el número de cuentas y apuntes 


troles no nos darán más quebraderos de ca¬ 
beza, a los potentes ordenadores del fisco, el 
contribuyente puede oponer la informática do¬ 
méstica y vencer en la contienda de los núme¬ 
ros. 
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EXITOS AMSTRAD 

¿SERAS CAPAZ DE PILOTAR UN 'HÁrRERT 



, . CDS Software LTD 


AMSTRAD DISK MS 7 MMÁ 


HARRIER • 

disco: 3.900 ptS. VA incluido 
cassette: 2.500 pts. iva» 


COLOSSUS CHESS - 

diSCO: 4.400 ptS. IVA incluido 
cassette: 2.500 pts. iva Muido 
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^ 7 , 

ai 

TI 
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FO 
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1 
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0 
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ATREVETE A ENFRENTAR AL COLOSSUS A OTRO JUEGO DE AJEDREZ 


¿TE GUSTARIA IR GANAND0LI 

5 'PRENDAS* A SAMANTHA? 





SAMANTHA FOX - 

i * ‘ 


/ADVANCED 


□□□nnrananra 

HraQnnnnira 


cas Amstrad: 1.995 pts. vamum 

❖ 

SERNA 

SISTEMA MUSICAL - 

Commodore: 4.300 pts. minuto 
Amstrad cas: 4.300 pts. mhub 
Amstrad disco: 5.800 pts. va Muido 

CREA TU PROPIA MUSICA 


RECORTA Y ENVIA ESTE CUPON A:«f SERMA C/. BRAVO MURILLO, 377 - 3.° A. 

28020 MADRID. TELS. 733 73 11 - 733 74 64 

harrier - disco □ cassette □ SAMANTHA FOX - Spectrum □ cas. Amstrad □ 

COLOSSUS - disco □ cassette □ S MUSICAL - Commodore □ cas. Amstrad □ disc. Amstrad □ 

NOMBRE Y APELLIDOS:_ 

DIRECCION:_CODIGO POSTAL:_ 



POBLACION:. 


PROVINCIA:. 




FORMA DE PAGO: TALON BANCARIO □ CONTRA REEMBOLSO □ 


























































































































DOMINE EL CODIGO 
MAQUINA 
EN SU AMSTRAD 

Toda la gente que se interesa por el códi¬ 
go máquina, ha visto, alguna vez, sus deseos 
frustrados por la «terrible complejidad», que 
aparentemente arrastra el aprendizaje de tan 
árido lenguaje, esto no es en absoluto cierto, 
y se debe a la poca visión que dan del código 
máquina algunos libros, que enseguida pro¬ 
fundizan en el mismo, dejando al lector total¬ 
mente aturdido por la avalancha de rutinas, 
en su mayoría complejas, que intentan hacer 
comprender al, todavía, novato, poniendo a 
favor la, poco clara, simplicidad de las mis¬ 
mas. 


Domine 

éCódgoMáqma 

ev\s\A 



El libro de Gifford y Vincent intenta corre¬ 
gir estas deficiencias, explicando sin grandes 
pretensiones, la manera de comenzar a pro¬ 
gramar en código máquina, su texto es fácil 
de leer, dejando claros casi todos los concep¬ 
tos que vamos viendo a medida que avanza¬ 
mos. 

El prólogo de los autores deja claro que es 
una guía y como tal no se extiende demasia¬ 
do con cada nemotécnico, pero deja una vi¬ 
sión clara de lo que hacen. Algunos serón di¬ 
fíciles de comprender en un principio, no im¬ 
porta, como todo costará un par de lecturas 
más de todo el libro y esos conceptos queda¬ 
rán suficientemente claros. 

El comienzo del libro es una breve explica¬ 
ción de qué es, para qué sirve y cómo progra¬ 
mar código máquina, contando qué son los sis¬ 
temas numéricos, por qué utilizarlos, qué es 
el lenguaje ensamblador. Incluso nos propor¬ 
ciona una pequeña muestra de los ensambla¬ 
dores disponibles para el Amstrad, casi to¬ 


dos publicados en Inglaterra, una lástima. Se¬ 
guimos avanzando dándole un breve repaso 
al hardware, las llamadas a subrutinas en má¬ 
quina, y a todos los demás conceptos básicos 
del código máquina. 

Conviene resaltar el capítulo 8, ya que está 
dedicado a diccionario de términos de códi¬ 
go máquina, dando una completa explicación 
de todos los registros, así como de los nemo¬ 
técnicas de la Z80. 

La explicación de cómo manejar los bits en 
código máquina, está hecha con gran clari¬ 
dad, dando una detallada explicación de có¬ 
mo utilizar las instrucciones dedicadas al ma¬ 
nejo de los mismos que posee la Z80. 

Tenemos un capítulo dedicado a la panta¬ 
lla del Amstrad, en el cual se hecha de me¬ 
nos algo más de extensión, ya que se dedica 
a comentar cómo funciona muy escuetamen¬ 
te, dando al mismo tiempo una serie de lla¬ 
madas al firmware que apenas vienen a cuen¬ 
to. 

Pero nadie es perfecto y está claro que Gif¬ 
ford y Vincent no iban a ser una excepción. 

Más de la mitad del libro está dedicado a 
los listados, en basic y ensamblador de diver¬ 
sas rutinas en código máquina en las cuales 
abundan las de pantalla típicas, macrocarac- 
teres, giro de frases a derecha e izquierda, 
compresores de pantalla. 

Hay que destacar la rutina para mover un 
bloque, ya sea gráficos o texto, por la panta¬ 
lla punto a punto, consiguiendo una suavidad 
de movimiento excepcional. 

También se suministra un monitor de códi¬ 
go máquina, que nos permitirá modificar la 
memoria a nuestro gusto. 

Estas rutinas se entregan como utilidades, 
sin ningún ánimo de que sean entendidas a la 
primera por el lector. 

Es un libro que merece la pena leer, ya que 
nos aclara bastantes conceptos de una manera 
amena. 

Los autores han conseguido que éste sea un 
libro fácil de entender que se lee rápidamen¬ 
te, algo que no es nada fácil. 


O: Dbí^lNE EL 
GO MAQUINA 
u amstrad 
ORIAL: RAMA 
IO: 2.200 


APRENDE LOGO 
CON AMSTRAD 


Logo es un lenguaje del que nos gustaría 
saber algo más, ya que la información que nos 
suministra con nuesiro ordenador es bastan¬ 
te deficiente, por eso no es de extrañar que 
cuando nos ponemos a ver libros de informá¬ 
tica y encontramos uno relacionado con este 
lenguaje, se nos vayan los ojos detrás suyo, 
esperando encontrar algo nuevo. 

Nosotros hemos encontrado algo muy nue¬ 
vo, Logo en Castellano. Un lenguaje como és¬ 
te, creado y dedicado a la educación, no es 
muy adecuado que tenga las instrucciones pri¬ 
mitivas en inglés, ya que los que no se lleven 
bien con dicha lengua, tendrán muchas más 
dificultades a la hora de intentar aprender Lo- 



Pensando en los pobres niños a los que es¬ 
tamos intentando enseñar a programar con es¬ 
te lenguaje, cómo se tienen que liar al inten¬ 
tar codificar un programa utilizando un idio¬ 
ma que no es el suyo, esto no es muy didácti¬ 
co que digamos. 

Bien, a Spen, S.A., se le ocurrió la ¡dea de 
hacer que el Logo del Amstrad, porqué no, 
estuviera en castellano, esto se consigue me¬ 
diante una serie de primitivas definidas en un 
fichero. No es que sea algo muy complicado, 
pero a ellos se les ocurrió primero. 

El libro está enfocado a los niños, por tanto 
no se mete a explorar las múltiples posibilida¬ 
des de este lenguaje, cosa que se le podía ocu¬ 
rrir a alguien, tal vez Amstrad España se 
digne a publicar la Guía de Logo que debie¬ 
ra acompañar al intérprete suministrado con 
el ordenador. El libro no descubre nada que 
no sepa el que se haya leído el manual. Pero 
al niño se le explican claramente casi todas las 
primitivas, en castellano, de las que dispone¬ 
mos; es una magnífica guía infantil de este len¬ 
guaje. 
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TITULO: APRENDE 1 

LOGO CON a»s trau 

EDITORIAL: RAMA 
PRECIO: 2.650 


En definitiva, el niño puede aprender a ma¬ 
nejar Logo con este libro, que fundamental¬ 
mente es de los que se trata, el mayor puede 
aclarar algunos conceptos oscuros, pero no 
creáis que todos. 



Las primitivas de las cuales disponemos en 
castellano son las siguientes: 


SI IF 

ATRAS BK 

IZQUIERDA LT 

DERECHA RT 

ADELANTE FD 

BORRAR PE 

EMPEZAR CS 

LISTAR POTS 

VER ST 

CARGAR LOAD 

SALVAR SAVE 

HAZ MAKE 

ESCRIBIR PR 

ESPACIO NODES 

UNE WORD 

ADIOS BYE 

PUNTO DOT 

SONIDO SOUND 

ALEATORIO RANDOM 

EDITAR ED 

ENTRADA RQ 

DIRECTORIO DIR 

REPETIR REPEAT 

CUENTA COUNT 

PLUMA-VISIBLE PD 

VER-TORTUGA ST 

ESCONDER-TORTUGA HT 

BORRAR-VARIABLE ERN 

COLOR-TORTUGA SETPC 

PANTALLA-DE-GRAFICOS FS 

VUELVE-TORTUGA WRAP 

SIN-PRIMERA BF 

SIN-ULTIMA BL 

PANTALLA-DE-TEXTO TS 

LISTAR-PROCEDIMIENTO PO 

DEJAR-ESPACIO RECYCLE 


Aquéllas que no encontremos no nos será 
muy difícil implementarlas mediante la primi¬ 
tiva adecuada. 

Podemos utilizar el Logo nativo de Alus¬ 
trad mezclado con el Logo Castellano, ya que 
no influye, al ser procedimientos, el que ha¬ 
llamos cargado el castellano. 

El libro viene repleto de ejercicios, solucio¬ 
nados y sin solucionar, que ayudan a una me¬ 
jor comprensión de los conceptos en él expli¬ 
cados. Todos los ejemplos vienen acompaña¬ 
dos por sus dibujos correspondientes, cosa que 
aclara mucho qué es lo que hace esa tarea, 
una imagen... 


RUTINAS EN CODIGO 
MAQUINA PARA 
SU AMSTRAD 

El código máquina es un tema sobre el que 
existen libros para todos los gustos y niveles. 
Desde los que comienzan mostrando al lector 
la definición de lo que es un bit, hasta los que 
en su segunda página poseen ya kilométricos 
listados de ensamblador y complicadas defi¬ 
niciones de firmware. 

Una de las cosas que uno ha de tener muy 
presente, dada la amplia gama de libros que 
como ya decimos existe sobre el tema, al com¬ 
prar un libro de código máquina es el nivel de 
conocimientos que posee y la utilización que 
va a hacer de él. 



No es lo mismo comprar un libro de lista¬ 
dos y subrutinas que nos ayuden a hacer más 
rápidos nuestros programas en basic que com¬ 
prar un libro de código máquina con el deseo 
de aprender las reglas por las cuales se rige 
su programación. 

En el caso de este libro la elección está muy 
clara; es recomendable a todo aquél que quie¬ 
ra aumentar la potencia de sus programas ba¬ 
sic, dándoles rapidez y efectos gráficos que en 
basic es imposible conseguir. 


Desde la primera página el libro se compo¬ 
ne de interesantes subrutinas para el manejo 
de pantallas, sonido, etc. Algo de agradecer: 
las subrutinas vienen dadas primero en basic, 
introduciéndolas en el ordenador mediante 
una serie de pokes. 

Luego aparece el listado en ensamblador, 
con lo cual el lector que sienta ese natural res¬ 
peto que todos sentimos al principio por estos 
listados puede eludirlos tranquilamente e in¬ 
troducir la subrutinas vienen dadas primero en 
basic, introduciéndolas en el ordenador me¬ 
diante una serie de pokes. Luego aparece el 
listado en ensamblador, con lo cual el lector 
que sienta ese natural respeto que todos sen¬ 
timos al principio por estos listados puede elu¬ 
dirlos tranquilamente e introducir la subruti¬ 
na «pokeando» como ya dijimos antes. 

Por el contrario, el lector que sepa qué la¬ 
bor desempeña cada uno de los nemónicos y 
conozca bien los registros del Z-80 puede exa¬ 
minar los listados de ensamblador e intentar 
sacar algo en claro para las subrutinas que lue¬ 
go él mismo cree. 



Como ya hemos comentado, casi todas las 
subrutinas van dirigidas a hacer verdaderas 
maravillas con lo que tenemos en pantalla. 

Una pequeña muestra de éstas: inversor de 
pantalla, copiador de texto, desplazamiento 
de texto, desplazamiento de bloques, explo¬ 
sión gráfica, letras itálicas, inclinadas, y, co¬ 
mo se suele decir un largo etc. 

En resumen, este libro pertenece a los que 
no tienen por intención enseñarnos el código 
en sí, sino darnos unas cuantas subrutinas para 
agilizar nuestros programas, tarea que desem¬ 
peña perfectamente. 

Por último algo que debería ser trivial pero 
que por desgracia no lo es en algunas oca¬ 
siones, las subrutinas del libro funcionan. 
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Puede comparar cualquier programa GROTUR de 
15.000 ptas. con otros de 75.000 y 150.000 pías, (que si¬ 
gue habiéndolos) y se sorprenderá. GROTUR es más rá¬ 
pido, más profesional y más actual. Permite además, que 
Ud. haga cualquier cambio si lo ordena la Ley. 




NUESTRO GABINETE TECNICO 
ESTA ABIERTO PARA 
REALIZARLE CUALQUIER 
MODIFICACION 0 CAMBIO 
QUE UD. ORDENE 



k informática 
f GROTUR, S. A. 

TEIF8. 474 M 00/32 - TELEX: I0SA 48457] 
C/. JAIME EL CONQUISTADOR, V 

1804 1 MADRID 


PARA 

PC COMPATIBLES Y AMSTRAD 

Programa Precio 

(Sin IVA) 


Almacén+IVA . 13.661 

Clientes con etiquetas . 7.679 

Clientes con etiquetas+historial . 11.518 

Cuentas . 7.679 

Facturación . 13.661 

Facturación y almacén . 16.875 

Libros del IVA . 15.000 

Presupuestos . 16.339 

Recibos . 16.339 

Recibos automáticos . 18.928 

Facturación por albaranes . 29.232 

Urbanizaciones . 35.714 

Agentes comerciales . 38.161 

Restaurantes . 31.250 

Talleres . 18.928 

Fabricación . 55.125 

Administración de fincas . 42.000 

Contabilidad-Libros del IVA . 26.600 

Médicos . 47.900 

Creador de documentos con clientes . 26.600 


Sólo en grandes almacenes 
y tiendas especializadas 


































Aprovéchate. Una oferta 
así sólo se presenta una 
vez al año. 

(oferta válida sólo para España, 
hasta el 28 de febrero de 1987). 
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